From f300ba9a9302e70dcc72523639aecc1e04feec53 Mon Sep 17 00:00:00 2001
From: Vidhu Kant Sharma <vidhukant@vidhukant.xyz>
Date: Mon, 12 Sep 2022 10:19:13 +0530
Subject: switched back to polybar

---
 .config/XMonad/lib/Defaults.hs | 34 +++++++++++++++++-----------------
 .config/XMonad/xmonad.hs       |  9 +++++----
 2 files changed, 22 insertions(+), 21 deletions(-)

(limited to '.config/XMonad')

diff --git a/.config/XMonad/lib/Defaults.hs b/.config/XMonad/lib/Defaults.hs
index f4779d1..9c83de6 100644
--- a/.config/XMonad/lib/Defaults.hs
+++ b/.config/XMonad/lib/Defaults.hs
@@ -6,8 +6,9 @@ import XMonad.Layout.Tabbed
 import XMonad.Actions.GridSelect
 import XMonad.Util.Loggers
 
-import XMonad.Hooks.StatusBar
-import XMonad.Hooks.StatusBar.PP
+-- import XMonad.Hooks.StatusBar
+-- import XMonad.Hooks.StatusBar.PP
+
 myBorder          = "#120F23"
 myBorder'         = "#C44CF2"
 
@@ -98,18 +99,17 @@ myGSConfig colorizer = (buildDefaultGSConfig myGSColorizer)
 
 myGridSelect = myGSConfig myGSColorizer
 
-myLemonbarCmd = "lemon | lemonbar -g 1920x28+1920+0 -o -2 -f 'Source Han Sans JP Normal:size=12' -B '#e6100b13' -F '#9d00ff'"
-myLemonbarPP  = def {
-  ppCurrent            = wrap "%{B#ff0aa3}   %{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              = ""
-  , ppTitle            = wrap " " "%{r}" . shorten 60
-  , ppOrder  = \(ws:l:t:ex) -> [t]++[ws]
-  }
-
-myLemonbarCmd' = "lemon | lemonbar -g 1920x20+0+0 -o 0 -f 'Source Han Sans JP Normal:size=9' -B '#e6100b13' -F '#9d00ff'"
-myLemonbarPP'  = myLemonbarPP
+-- myLemonbarCmd =  "lemon | lemonbar -d -g 1920x28+1920+0 -o -2 -f 'Source Han Sans JP Normal:size=12' -B '#e6100b13' -F '#9d00ff'"
+-- myLemonbarCmd' = "lemon | lemonbar -d -g 1920x20+0+0    -o 0  -f 'Source Han Sans JP Normal:size=9'  -B '#e6100b13' -F '#9d00ff'"
+-- 
+-- myLemonbarPP  = def {
+--   ppCurrent            = wrap "%{B#ff0aa3}   %{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              = ""
+--   , ppTitle            = wrap " " "" . shorten 60
+--   , ppOrder  = \(ws:l:t:ex) -> [t]++["%{r}",ws]
+--   }
diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs
index c7f3ac0..6a4626d 100644
--- a/.config/XMonad/xmonad.hs
+++ b/.config/XMonad/xmonad.hs
@@ -4,11 +4,11 @@ import XMonad
 
 import XMonad.Hooks.ManageDocks
 import XMonad.Hooks.EwmhDesktops
+-- import XMonad.Hooks.StatusBar
 
 import XMonad.Util.EZConfig
 import XMonad.Util.Run
 
-import XMonad.Hooks.StatusBar
 
 import Keybindings
 import Defaults
@@ -16,9 +16,10 @@ import Hooks
 
 main :: IO ()
 main = do
-  myLemonbar  <- statusBarPipe myLemonbarCmd  (pure myLemonbarPP )
-  myLemonbar' <- statusBarPipe myLemonbarCmd' (pure myLemonbarPP')
-  xmonad $ withSB myLemonbar $ withSB myLemonbar' $ ewmhFullscreen $ ewmh $ docks def {
+  -- myLemonbar  <- statusBarPipe myLemonbarCmd  (pure myLemonbarPP)
+  -- myLemonbar' <- statusBarPipe myLemonbarCmd' (pure myLemonbarPP)
+  -- xmonad $ withSB (myLemonbar <> myLemonbar') $ ewmhFullscreen $ docks def {
+  xmonad $ ewmhFullscreen $ ewmh $ docks def {
     focusFollowsMouse    = True
     , terminal           = myTerminal
     , borderWidth        = myBorderWidth
-- 
cgit v1.2.3