From 806abf388145340197c59410d907d363fc61459e Mon Sep 17 00:00:00 2001 From: Raymaekers Luca Date: Mon, 27 Feb 2023 13:18:25 +0100 Subject: don't underline active workspace --- config/X/xmonad/xmonad.hs | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) (limited to 'config/X/xmonad') 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 = "" -rightwp = "" - -- 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 -- cgit v1.2.3