diff options
Diffstat (limited to 'src/lib/Monitors.hs')
-rw-r--r-- | src/lib/Monitors.hs | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/lib/Monitors.hs b/src/lib/Monitors.hs index daa59b7..d589ce1 100644 --- a/src/lib/Monitors.hs +++ b/src/lib/Monitors.hs @@ -76,7 +76,7 @@ uptime p = Uptime (p <~> [ "-t" , "<days> <hours>", "-m", "3", "-c", "0", "-S" , "On" , "-L", "10", "-H", "100"]) 600 -- 🌧 -weather st p = +weather' tmp st p = WeatherX st [ ("", "<fc=gray60><fn=4>🌑</fn></fc>") , ("clear", "<fn=4>🌣</fn>") @@ -91,10 +91,11 @@ weather st p = , ("partly cloudy", "<fn=3>⛅</fn>") , ("mostly cloudy", "<fn=3>☁</fn>") , ("considerable cloudiness", "<fn=4>⛈</fn>")] - (p <~> ["-t", "<skyConditionS> <tempC>° <rh>% <windKmh> (<hour>)" - , "-L","10", "-H", "25"]) + (p <~> ["-t", tmp , "-L","10", "-H", "25"]) 18000 +weather = weather' "<skyConditionS> <tempC>° <rh>% <windKmh> (<hour>)" + batt p = BatteryN ["BAT0"] ["-t", "<acstatus> <left>" @@ -125,7 +126,7 @@ diskU p = 20 diskArgs p = mkArgs p - ["-f", "░", "-b", " ", "-L", "200000", "-H" , "10000000" + ["-f", "░", "-b", " ", "-L", "10000000", "-H" , "100000000" , "-W", "5", "-w", "5", "-p", "3"] ["--total-icon-pattern", "<icon=load_%%.xpm/>"] |