From 3d99cb44596006f8b6cfbf0f1f0daad5e54bd164 Mon Sep 17 00:00:00 2001
From: Vidhu Kant Sharma <vidhukant@vidhukant.xyz>
Date: Fri, 9 Sep 2022 00:21:22 +0530
Subject: added a second bar for second monitor, made active workspaces a
 different color on both monitors

---
 .config/XMonad/lib/Defaults.hs | 22 ++++++++++++++++------
 .config/XMonad/xmonad.hs       |  5 +++--
 2 files changed, 19 insertions(+), 8 deletions(-)

(limited to '.config/XMonad')

diff --git a/.config/XMonad/lib/Defaults.hs b/.config/XMonad/lib/Defaults.hs
index e4b40eb..9e9d318 100644
--- a/.config/XMonad/lib/Defaults.hs
+++ b/.config/XMonad/lib/Defaults.hs
@@ -98,16 +98,26 @@ myGSConfig colorizer = (buildDefaultGSConfig myGSColorizer)
 
 myGridSelect = myGSConfig myGSColorizer
 
-myLemonbarCmd = "lemonbar -g 445x28+1475+0 -f 'SauceCodePro:style=Regular:size=11' -f 'Source Han Sans JP Normal:size=11' -B '#e6100b13' -F '#9d00ff'"
-
-myLemonbarPP = def {
-  -- wrap "%{B#}  %{F#}" "  %{F-}%{B-}"
+myLemonbarCmd = "lemonbar -g 445x28+3395+0 -f 'SauceCodePro:style=Regular:size=11' -f 'Source Han Sans JP Normal:size=11' -B '#e6100b13' -F '#9d00ff'"
+myLemonbarPP  = def {
   ppCurrent            = wrap "%{B#ff0aa3}   %{F#FFFFFF}" "   %{F-}%{B-}"
-  , ppVisible          = wrap "%{B#83ddc3}   %{F#FFFFFF}" "   %{F-}%{B-}"
+  , ppVisible          = wrap "%{B#28c78f}   %{F#FFFFFF}" "   %{F-}%{B-}"
+  , ppHidden           = wrap "%{B#9b1bed}   %{F#FFFFFF}" "   %{F-}%{B-}"
+  , ppHiddenNoWindows  = wrap "   " "   "
+  --, ppVisibleNoWindows = wrap "%{B#ffffff}  %{F#9b1bed}" "  %{F-}%{B-}"
+  , ppWsSep            = ""
+  , ppSep              = ""
+  , ppOrder  = \(ws:l:t:ex) -> ["%{r}",ws]++[]++[]++ex
+  }
+
+myLemonbarCmd' = "lemonbar -g 343x20+1577+0 -f 'SauceCodePro:style=Regular:size=9' -f 'Source Han Sans JP Normal:size=9' -B '#e6100b13' -F '#9d00ff'"
+myLemonbarPP'  = def {
+  ppCurrent            = wrap "%{B#28c78f}   %{F#FFFFFF}" "   %{F-}%{B-}"
+  , ppVisible          = wrap "%{B#ff0aa3}   %{F#FFFFFF}" "   %{F-}%{B-}"
   , ppHidden           = wrap "%{B#9b1bed}   %{F#FFFFFF}" "   %{F-}%{B-}"
   , ppHiddenNoWindows  = wrap "   " "   "
   --, ppVisibleNoWindows = wrap "%{B#ffffff}  %{F#9b1bed}" "  %{F-}%{B-}"
   , ppWsSep            = ""
   , ppSep              = ""
-  , ppOrder  = \(ws:l:t:ex) -> [ws]++[]++[]++ex
+  , ppOrder  = \(ws:l:t:ex) -> ["%{r}",ws]++[]++[]++ex
   }
diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs
index 3b1c995..c7f3ac0 100644
--- a/.config/XMonad/xmonad.hs
+++ b/.config/XMonad/xmonad.hs
@@ -16,8 +16,9 @@ import Hooks
 
 main :: IO ()
 main = do
-  myLemonbar <- statusBarPipe myLemonbarCmd (pure myLemonbarPP)
-  xmonad $ withSB myLemonbar $ ewmhFullscreen $ ewmh $ docks def {
+  myLemonbar  <- statusBarPipe myLemonbarCmd  (pure myLemonbarPP )
+  myLemonbar' <- statusBarPipe myLemonbarCmd' (pure myLemonbarPP')
+  xmonad $ withSB myLemonbar $ withSB myLemonbar' $ ewmhFullscreen $ ewmh $ docks def {
     focusFollowsMouse    = True
     , terminal           = myTerminal
     , borderWidth        = myBorderWidth
-- 
cgit v1.2.3