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)
]
, template =
let
greyFg x = "<fc=#c9c9c9>" <> x <> "</fc>"
in
" %XMonadLog% "
<> alignSep config
<> intercalate "|"
[ unwords
[ "<fc=#c9c9c9>[AUA: %arubaClock%]</fc>"
, "<fc=#c9c9c9>[DUB: %dublinClock%]</fc>"
, "<fc=#c9c9c9>[CDG: %cetClock%]</fc>"
, "<fc=#c9c9c9>[TPE: %tstClock%]</fc>"
[ (unwords . map greyFg)
[ "[AUA: %arubaClock%]"
, "[DUB: %dublinClock%]"
, "[CDG: %cetClock%]"
, "[TPE: %tstClock%]"
]
<> " "
, " %RCSS% "