hektor
/
dots
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Update 'xmobar' config

master
Hektor Misplon 2022-12-01 16:18:44 +01:00
parent 671e9ed919
commit 01a3f64612
1 changed files with 26 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
.xmonad/xmonad.hs
View File

@ -30,24 +30,26 @@ import XMonad.Util.Ungrab
-- Statusbar -- Statusbar
myXmobarPP :: PP myXmobarPP :: PP
myXmobarPP = def myXmobarPP =
{ ppSep = tertiaryColor " | " def
, ppCurrent = brackitify { ppSep = tertiaryColor " | ",
, ppHidden = secondaryColor ppCurrent = brackitify,
, ppHiddenNoWindows = tertiaryColor ppHidden = secondaryColor,
, ppUrgent = red . wrap (yellow "!") (yellow "!") ppHiddenNoWindows = tertiaryColor,
, ppLayout = \l -> case l of "Tall" -> "[]=" ppUrgent = red . wrap (yellow "!") (yellow "!"),
ppLayout = \l -> case l of
"Tall" -> "[]="
"Magnifier Tall" -> "[]+" "Magnifier Tall" -> "[]+"
"Magnifier (off) Tall" -> "[]=" "Magnifier (off) Tall" -> "[]="
"Magnifier Mirror Tall" -> "+[]" "Magnifier Mirror Tall" -> "+[]"
"Magnifier (off) Mirror Tall" -> "=[]" "Magnifier (off) Mirror Tall" -> "=[]"
"Full" -> "[ ]" "Full" -> "[ ]"
"ThreeCol" -> "|||" "ThreeCol" -> "|||"
_ -> l _ -> l,
, ppTitle = shorten 80 ppTitle = shorten 80,
, ppTitleSanitize = xmobarStrip ppTitleSanitize = xmobarStrip,
, ppOrder = \[ws, l, _, wins] -> [ws, l, wins] ppOrder = \[ws, l, _, wins] -> [ws, l, wins],
, ppExtras = [logTitles formatFocused formatUnfocused] ppExtras = [logTitles formatFocused formatUnfocused]
} }
where where
brackitify = wrap "[" "]" brackitify = wrap "[" "]"
@ -56,9 +58,9 @@ myXmobarPP = def
ppWindow = xmobarRaw . (\w -> if null w then "Untitled" else w) . shorten 16 ppWindow = xmobarRaw . (\w -> if null w then "Untitled" else w) . shorten 16
primaryColor = xmobarColor "#eeeeee" "" primaryColor = xmobarColor "#000000" ""
secondaryColor = xmobarColor "#aaaaaa" "" secondaryColor = xmobarColor "#333333" ""
tertiaryColor = xmobarColor "#888888" "" tertiaryColor = xmobarColor "#555555" ""
yellow = xmobarColor "#ff0" "" yellow = xmobarColor "#ff0" ""
red = xmobarColor "#ff5555" "" red = xmobarColor "#ff5555" ""