fix logMode
This commit is contained in:
parent
10c23160e0
commit
29470db35a
1 changed files with 5 additions and 2 deletions
|
@ -218,14 +218,17 @@ myXmobarPP :: PP
|
|||
myXmobarPP = def
|
||||
{ ppSep = grey0 " "
|
||||
, ppCurrent = blue . wrap " " ""
|
||||
, ppTitle = grey0 . wrap " " "" . shorten 32
|
||||
, ppVisible = purple . wrap " " ""
|
||||
, ppHidden = grey0 . wrap " " ""
|
||||
, ppHiddenNoWindows = grey0 . wrap " " ""
|
||||
, ppUrgent = red . wrap " " ""
|
||||
, ppLayout = aqua . wrap (grey0 " <fn=1>[</fn> ") (grey0 " <fn=1>]</fn> ")
|
||||
, ppOrder = \[ws, l, _, mode] -> [ws, l, mode]
|
||||
, ppExtras = [logMode]
|
||||
, ppOrder = \case { [ws, l, title, mode] -> [ws, l, mode, title]; xs -> xs }
|
||||
, ppExtras = [lMode]
|
||||
}
|
||||
where
|
||||
lMode = xmobarColorL "#a89984" "background" logMode
|
||||
|
||||
|
||||
--
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue