summaryrefslogtreecommitdiffhomepage
path: root/src/lib/Monitors.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2019-12-05 01:16:59 +0000
committerjao <jao@gnu.org>2019-12-05 01:18:20 +0000
commit318ce5d54950aea41bb2f3bfce73658a03bc691a (patch)
treebd0b72a721ab80aa3851fd255d3ec3a7bcacdee8 /src/lib/Monitors.hs
parent413dde1f9a12da0449cd4356f3ff7566cd812ec9 (diff)
downloadxmobar-config-318ce5d54950aea41bb2f3bfce73658a03bc691a.tar.gz
xmobar-config-318ce5d54950aea41bb2f3bfce73658a03bc691a.tar.bz2
little tweaks for xmobar-exwm
Diffstat (limited to 'src/lib/Monitors.hs')
-rw-r--r--src/lib/Monitors.hs9
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/>"]