xmonad: dotted hidden workspace

This commit is contained in:
Primrose 2025-04-05 12:52:21 +02:00
parent a182312515
commit 88476a03d6
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA

View file

@ -25,7 +25,7 @@ import XMonad.Hooks.EwmhDesktops (ewmh, ewmhFullscreen)
import XMonad.Hooks.InsertPosition (insertPosition, Focus(Newer, Older), Position(Below, Above)) import XMonad.Hooks.InsertPosition (insertPosition, Focus(Newer, Older), Position(Below, Above))
import XMonad.Hooks.RefocusLast (refocusLastLogHook) import XMonad.Hooks.RefocusLast (refocusLastLogHook)
import XMonad.Hooks.StatusBar (StatusBarConfig, statusBarProp, dynamicEasySBs) import XMonad.Hooks.StatusBar (StatusBarConfig, statusBarProp, dynamicEasySBs)
import XMonad.Hooks.DynamicLog (PP(ppHiddenNoWindows, ppCurrent, ppSep, ppTitle, ppHidden), xmobarColor, filterOutWsPP, wrap) import XMonad.Hooks.DynamicLog (PP(ppHiddenNoWindows, ppCurrent, ppSep, ppTitle), xmobarColor, filterOutWsPP, wrap)
import XMonad.Util.Hacks (javaHack) import XMonad.Util.Hacks (javaHack)
@ -240,8 +240,7 @@ xmobar = \case
filterOutWsPP [scratchpadWorkspaceTag] filterOutWsPP [scratchpadWorkspaceTag]
$ def $ def
{ ppCurrent = xmobarColor "#000000" "#ffffff" . wrap " " " " . fmap toUpper { ppCurrent = xmobarColor "#000000" "#ffffff" . wrap " " " " . fmap toUpper
, ppHidden = fmap toUpper , ppHiddenNoWindows = xmobarColor "#9c9c9c" "" . const ""
, ppHiddenNoWindows = xmobarColor "#9c9c9c" ""
, ppSep = " | " , ppSep = " | "
, ppTitle = const "" , ppTitle = const ""
} }