FIX remove extra window list space

This commit is contained in:
Nathan Dwarshuis 2020-02-16 01:05:54 -05:00
parent 724076bece
commit a020dbe82f
1 changed files with 2 additions and 1 deletions

View File

@ -73,7 +73,8 @@ myLoghook h = withWindowSet $ io . hPutStrLn h . myWindowSetXinerama
myWindowSetXinerama ws = wsString ++ sep ++ layout
where
wsString = xmobarColor "#444444" "" $ onscreen ++ " " ++ offscreen
wsString = xmobarColor "#444444" "" $ onscreen ++ offscreen'
offscreen' = if offscreen == "" then "" else " " ++ offscreen
sep = xmobarColor "#888888" "" " : "
onscreen = xmobarColor "#5574ad" visColor
$ wrap " " " "