FIX format error
This commit is contained in:
parent
8d786f8475
commit
d4cdd69b80
|
@ -247,7 +247,8 @@ myLoghook h = withWindowSet $ io . hPutStrLn h . myWindowSetXinerama
|
||||||
myWindowSetXinerama
|
myWindowSetXinerama
|
||||||
:: LayoutClass layout a1 =>
|
:: LayoutClass layout a1 =>
|
||||||
W.StackSet String (layout a1) a2 ScreenId ScreenDetail -> String
|
W.StackSet String (layout a1) a2 ScreenId ScreenDetail -> String
|
||||||
myWindowSetXinerama ws = unwords [onScreen, offScreen, sep, layout, nWindows]
|
myWindowSetXinerama ws =
|
||||||
|
unwords $ filter (not . null) [onScreen, offScreen, sep, layout, nWindows]
|
||||||
where
|
where
|
||||||
onScreen = xmobarColor hilightFgColor hilightBgColor
|
onScreen = xmobarColor hilightFgColor hilightBgColor
|
||||||
$ pad
|
$ pad
|
||||||
|
|
Loading…
Reference in New Issue