sercanto/rcfiles
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

xmonad: switched to polybar

Browse source
This commit is contained in:
Serĉanto de Scio 2023-08-26 21:51:20 +10:00
parent b8aae88553
commit 2de61cfd7f
Signed by: sercanto
GPG key ID: 7DBA9F5689EFB6AA
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
.xmonad/xmonad.hs
View file

@ -29,7 +29,7 @@ main =
. ewmh
. withNavigation2DConfig myNav2DConf
. (`additionalKeysP` myKeybinds)
. withEasySB (statusBarProp "xmobar" (pure myXmobarPP)) defToggleStrutsKey
. withEasySB (statusBarProp "polybar" (pure myPolybarPP)) defToggleStrutsKey
$ myConfig
-- myConfig :: XConfig (Choose (ModifiedLayout Spacing Tall) (Choose (Mirror (ModifiedLayout Spacing Tall)) Full))
@ -52,11 +52,11 @@ myStartupHook = do
spawnOnce myScreenLockCmd
------------
-- xmobar --
-- polybar --
------------
myXmobarPP :: PP
myXmobarPP =
myPolybarPP :: PP
myPolybarPP =
def
{ ppCurrent = wrap "" "" . xmobarBorder "Top" blue 2,
ppExtras = [logTitles formatFocused formatUnfocused],