fuxino/dotfiles
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Hide the NSP workspace in xmobar while it's empty

Browse Source
This commit is contained in:
Daniele Fucini
2026-10-25 21:23:41 +01:00
parent 5d8620560a
commit 15e6dfebb7
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
.config/xmonad/xmonad.hs
+3
View File
@@ -3,6 +3,7 @@
import Data.Monoid import Data.Monoid
import Graphics.X11.ExtraTypes.XF86 import Graphics.X11.ExtraTypes.XF86
import Control.Monad (forM_, liftM2, when) import Control.Monad (forM_, liftM2, when)
import Data.Maybe (isJust)
import XMonad import XMonad
import XMonad.Actions.OnScreen (greedyViewOnScreen) import XMonad.Actions.OnScreen (greedyViewOnScreen)
import XMonad.Actions.PhysicalScreens import XMonad.Actions.PhysicalScreens
@@ -241,6 +242,8 @@ myXmobarPP =
ppHidden = cultured . wrap " " "", ppHidden = cultured . wrap " " "",
ppHiddenNoWindows = outerspace . wrap " " "", ppHiddenNoWindows = outerspace . wrap " " "",
ppUrgent = sunsetorange . wrap (keylime "!") (keylime "!"), ppUrgent = sunsetorange . wrap (keylime "!") (keylime "!"),
-- NamedScratchpad never removes NSP once created; hide it while it's empty
ppSort = (. filter (\w -> W.tag w /= scratchpadWorkspaceTag || isJust (W.stack w))) <$> ppSort def,
ppOrder = \[ws, l, _, wins] -> [ws, l, wins], ppOrder = \[ws, l, _, wins] -> [ws, l, wins],
ppExtras = [logTitles formatFocused formatUnfocused] ppExtras = [logTitles formatFocused formatUnfocused]
} }