vanadium/xmobar: factor out color specification

This commit is contained in:
Primrose 2025-08-26 09:18:36 +08:00
parent 628a3ec647
commit 570e0124f0
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA

View file

@ -62,14 +62,17 @@ config =
(15 &minute) (15 &minute)
] ]
, template = , template =
let
greyFg x = "<fc=#c9c9c9>" <> x <> "</fc>"
in
" %XMonadLog% " " %XMonadLog% "
<> alignSep config <> alignSep config
<> intercalate "|" <> intercalate "|"
[ unwords [ (unwords . map greyFg)
[ "<fc=#c9c9c9>[AUA: %arubaClock%]</fc>" [ "[AUA: %arubaClock%]"
, "<fc=#c9c9c9>[DUB: %dublinClock%]</fc>" , "[DUB: %dublinClock%]"
, "<fc=#c9c9c9>[CDG: %cetClock%]</fc>" , "[CDG: %cetClock%]"
, "<fc=#c9c9c9>[TPE: %tstClock%]</fc>" , "[TPE: %tstClock%]"
] ]
<> " " <> " "
, " %RCSS% " , " %RCSS% "