diff options
| author | Raymaekers Luca <raymaekers.luca@gmail.com> | 2023-02-27 13:18:25 +0100 |
|---|---|---|
| committer | Raymaekers Luca <raymaekers.luca@gmail.com> | 2023-02-27 13:18:56 +0100 |
| commit | 806abf388145340197c59410d907d363fc61459e (patch) | |
| tree | 005ced4430334e25472128cee5f1764fda51ce16 /config/X | |
| parent | 48d8be278152ca2056585cb9dd1a0eeb6d2a6259 (diff) | |
don't underline active workspace
Diffstat (limited to 'config/X')
| -rw-r--r-- | config/X/xmonad/xmonad.hs | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/config/X/xmonad/xmonad.hs b/config/X/xmonad/xmonad.hs index 6d5c139..bc1115d 100644 --- a/config/X/xmonad/xmonad.hs +++ b/config/X/xmonad/xmonad.hs @@ -76,9 +76,6 @@ color05 = "#81a1c1" color09 = "#4c566a" color17 = "#d03a3f" -leftwp = "<box type=Bottom width=2 mb=2 color=" ++ colorfg ++ ">" -rightwp = "</box>" - -- Count of window in active workspace windowCount :: X (Maybe String) windowCount = gets $ Just . show . length . W.integrate' . W.stack . W.workspace . W.current . windowset @@ -189,16 +186,15 @@ myStartupHook = do main = do -- Setup xmobar as docks -- - xmproc0 <- spawnPipe "xmobar $HOME/.config/xmobar/xmobarrc0.hs" - xmproc1 <- spawnPipe "xmobar $HOME/.config/xmobar/xmobarrc1.hs" + xmproc <- spawnPipe "xmobar $HOME/.config/xmobar/xmobarrc.hs" -- ewmh: Add fullscreen handling support xmonad $ docks . ewmh $ defaults { layoutHook = avoidStruts $ layoutHook defaults , logHook = dynamicLogWithPP $ filterOutWsPP ["hid"] $ xmobarPP { - ppOutput = \x -> hPutStrLn xmproc0 x + ppOutput = \x -> hPutStrLn xmproc x - , ppCurrent = xmobarColor colorfg colorbg . wrap leftwp rightwp -- Visible but not current workspace + , ppCurrent = xmobarColor colorfg colorbg -- Visible but not current workspace , ppVisible = xmobarColor colorfg colorbg -- Hidden workspace , ppHidden = xmobarColor color01 colorbg -- Hidden workspaces (no windows) , ppHiddenNoWindows = xmobarColor color04 colorbg -- Title of active window |