racial conflict again

This commit is contained in:
Sakooooo 2023-07-25 01:27:55 +03:00
parent c9e872f687
commit 74e2677939
Signed by: sako
GPG key ID: 3FD715D87D7725E0

View file

@ -257,14 +257,14 @@ myLogHook h = dynamicLogWithPP $ def {
ppOrder = \(ws:_) -> [ws]
}
xmobarFormat = def {
myXmobarFormat = def {
ppCurrent = xmobarColor "black" "white",
ppOutput = hPutStrLn h,
ppExtras = [],
ppOrder = \(ws:_) -> [ws]
}
statusBar = statusBarProp "xmobar" (pure xmobarFormat)
myStatusBar= statusBarProp "xmobar" (pure myXmobarFormat)
------------------------------------------------------------------------
-- Startup hook
@ -287,7 +287,7 @@ myStartupHook = do
--
main = do
h <- spawnPipe "xmobar"
xmonad $ withEasySB statusBar $ defaults {
xmonad $ withEasySB myStatusBar $ defaults {
layoutHook = avoidStruts $ layoutHook def,
logHook = myLogHook h,