diff options
Diffstat (limited to 'dotfiles/xmonad.hs')
-rw-r--r-- | dotfiles/xmonad.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/dotfiles/xmonad.hs b/dotfiles/xmonad.hs index 1a823fb..a514729 100644 --- a/dotfiles/xmonad.hs +++ b/dotfiles/xmonad.hs @@ -236,15 +236,15 @@ myStatusBar = statusBarProp "xmobar" (do numWindows <- getNumberOfWindowsInWorkpace return $ def { ppCurrent = if numWindows > 0 - then xmobarBorder "Top" foregroundColor 4 . xmobarColor foregroundColor backgroundColor . wrap " " " " - else xmobarColor foregroundColor backgroundColor . wrap " " " " + then xmobarBorder "Top" foregroundColor 4 . xmobarColor foregroundColor backgroundColor . wrap " " " " + else xmobarColor foregroundColor backgroundColor . wrap " " " " , ppTitle = id , ppSep = " | " , ppWsSep = "" , ppLayout = (\_ -> "") - , ppHidden = (\s -> clickableWrap ((read s::Int) - 1) (createDwmBox foregroundColor (" " ++ s ++ " "))) --better way to clickablewrap . - , ppHiddenNoWindows = (\s -> clickableWrap ((read s::Int) - 1) (" " ++ s ++ " ")) - , ppUrgent = (\s -> clickableWrap ((read s::Int) - 1) (xmobarBorder "Top" urgentColor 4 (" " ++ s ++ " "))) + , ppHidden = (\s -> clickableWrap ((read s::Int) - 1) (createDwmBox foregroundColor (" " ++ s ++ " "))) --better way to clickablewrap . + , ppHiddenNoWindows = (\s -> clickableWrap ((read s::Int) - 1) (" " ++ s ++ " ")) + , ppUrgent = (\s -> clickableWrap ((read s::Int) - 1) (xmobarBorder "Top" urgentColor 4 (" " ++ s ++ " "))) } ) where @@ -282,4 +282,4 @@ main = do layoutHook = myLayout, handleEventHook = myServerModeEventHook, manageHook = myManageHook - } \ No newline at end of file + } |