import Xmobar
-- | Configuration
config :: Config
config = defaultConfig
-- general settings
{ font = "Fira Code Semi Bold 9"
, additionalFonts = [ "Symbols Nerd Font 2048-em 24" ]
, bgColor = "#282828"
, fgColor = "#d4be98"
, position = Static { xpos = 1920, ypos = 0, width = 2560, height = 24 }
-- commands to run
, commands =
[ Run $ XPropertyLog "_XMONAD_LOG_1"
, Run $ Com "uname" ["-r","-s"] "" 0
, Run $ Date "%a %b %_d %Y %H:%M:%S" "date" 10
, Run $ Weather "YPJT"
[ "-t", "Temp: C | Wind: km/h | Humidity: %" ]
18000
]
-- format our bar
, sepChar = "%"
, alignSep = "}{"
, template = "\59255 %uname% |%_XMONAD_LOG_1%}{%YPJT% | %date%"
}
main :: IO ()
main = configFromArgs config >>= xmobar