summaryrefslogtreecommitdiffhomepage
path: root/src/lib/Monitors.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2019-09-20 00:26:12 +0100
committerjao <jao@gnu.org>2019-09-20 00:26:48 +0100
commit26767d5adb227e11077c7b4089a082679e59394e (patch)
tree8999ab3a08a19b265155eb558f74207b20c9576f /src/lib/Monitors.hs
parent504e569a85ca2887207a18428289975b4700fa4a (diff)
downloadxmobar-config-26767d5adb227e11077c7b4089a082679e59394e.tar.gz
xmobar-config-26767d5adb227e11077c7b4089a082679e59394e.tar.bz2
TopC for xmobar-exwm
Diffstat (limited to 'src/lib/Monitors.hs')
-rw-r--r--src/lib/Monitors.hs52
1 files changed, 38 insertions, 14 deletions
diff --git a/src/lib/Monitors.hs b/src/lib/Monitors.hs
index 473eebf..3c35488 100644
--- a/src/lib/Monitors.hs
+++ b/src/lib/Monitors.hs
@@ -40,6 +40,10 @@ topProc p = TopProc (p <~> ["-t" , "<mboth3> <mboth2> <mboth1> \
\ยท <both3> <both2> <both1>"
, "-w", "10", "-L" , "10", "-H", "80"]) 15
+topProc' p = TopProc (p <~> ["-t" , "<mboth1> <mboth2> <mboth3> \
+ \ยท <both1> <both2> <both3>"
+ , "-w", "10", "-L" , "10", "-H", "80"]) 15
+
wireless p = Wireless "wlp2s0" (p <~> ["-t" , "<essid> <quality>"
, "-W", "5", "-M", "15" , "-m", "3"
, "-L", "20", "-H", "80"]) 20
@@ -60,18 +64,21 @@ dynNetwork p = DynNetwork (p <~> ["-t", "<fn=1>โ†‘</fn> <tx> <fn=1>โ†“</fn> <rx
uptime p = Uptime (p <~> [ "-t" , "<days> <hours>", "-m", "3", "-c", "0", "-S"
, "On" , "-L", "10", "-H", "100"]) 600
+-- ๐ŸŒง
weather st =
WeatherX st
- [ ("clear", "<fn=4>๐ŸŒฃ</fn>")
+ [ ("", "<fc=gray60><fn=4>๐ŸŒ‘</fn></fc>")
+ , ("clear", "<fn=4>๐ŸŒฃ</fn>")
, ("sunny", "<fn=4>๐ŸŒฃ</fn>")
, ("mostly clear", "<fn=4>๐ŸŒค</fn>")
, ("mostly sunny", "<fn=4>๐ŸŒค</fn>")
, ("partly sunny", "<fn=3>โ›…</fn>")
, ("fair", "<fn=4>๐ŸŒ‘</fn>")
+ , ("obscured", "<fn=4>๐ŸŒ</fn>") -- ๐ŸŒซ
, ("cloudy","<fn=3>โ˜</fn>")
, ("overcast","<fn=3>โ˜</fn>")
, ("partly cloudy", "<fn=3>โ›…</fn>")
- , ("mostly cloudy", "<fn=4>๐ŸŒง</fn>")
+ , ("mostly cloudy", "<fn=3>โ˜</fn>")
, ("considerable cloudiness", "<fn=4>โ›ˆ</fn>")]
["-t", "<skyConditionS> <tempC>ยฐ <rh>% <windKmh> (<hour>)"
, "-L","10", "-H", "25", "--normal", "black"
@@ -94,8 +101,8 @@ batt p =
, "-h", "sienna4", "-l", "gray20"] 50 "batt0"
coreTemp p =
- CoreTemp (p <~> ["-t", "<core1>ยฐ <core2>ยฐ"
- , "-L", "50", "-H", "75", "-d", "0"]) 50
+ MultiCoreTemp (p <~> ["-t", "<avg>ยฐ"
+ , "-L", "50", "-H", "75", "-d", "0"]) 50
diskU p =
DiskU [("dm-1", "<used>") , ("/media/sdb", " s <used>")]
@@ -111,21 +118,38 @@ diskIO p =
, "-W", "5", "-w", "5", "-p", "3"])
10
--- <fn=1>๐Ÿ“จ ๐Ÿ–… ๐Ÿ–ƒ ๐Ÿ“ฉ</fn>
-mbox = MBox [ ("I", "inbox", "darkseagreen4")
- , ("B", "bigml.spool", "sienna4")
- , ("S", "bigsup.spool", "sienna4")
- , ("G", "geiser.spool", "darkseagreen4")
- , ("X", "xmobar.spool", "darkseagreen4")
- , ("g", "gnu.spool", "")
- , ("k", "books.spool", "")
- ] ["-d", "/home/jao/var/mail", "-p", "<fn=2>๐Ÿ–„ </fn>", "-s", ""] "mbox"
+-- <fn=1>๐Ÿ“จ ๐Ÿ–… ๐Ÿ–ƒ ๐Ÿ“ฉ โœ‰ </fn>
+mbox = MBox [ ("L", "/var/mail/jao", "grey60")
+ -- , ("B", "bigml.spool", "sienna4")
+ -- , ("S", "bigsup.spool", "sienna4")
+ -- , ("G", "geiser.spool", "darkseagreen4")
+ -- , ("X", "xmobar.spool", "darkseagreen4")
+ -- , ("g", "gnu.spool", "")
+ -- , ("k", "books.spool", "")
+ ] [] -- ["-p", "<fn=2>๐Ÿ“ฉ </fn>", "-s", ""]
+ "mbox"
+
+mail = Mail [ ("I", "~/var/maildir/jao/inbox")
+ , ("G", "~/var/maildir/jao/geiser")
+ , ("X", "~/var/maildir/jao/xmobar")
+ , ("B", "~/var/maildir/bigml/inbox")
+ , ("S", "~/var/maildir/bigml/support")
+ ]
+ "mail"
+
+-- mail = Mail [ ("<fc=darkseagreen4><fn=2>๐Ÿ–ƒ </fn></fc>", "~/var/maildir/jao/inbox")
+-- , ("<fc=darkseagreen3><fn=2>๐Ÿ–ƒ </fn></fc>", "~/var/maildir/jao/geiser")
+-- , ("<fc=darkseagreen3><fn=2>๐Ÿ–ƒ </fn></fc>", "~/var/maildir/jao/xmobar")
+-- , ("<fc=sienna2><fn=2>๐Ÿ–„ </fn></fc>", "~/var/maildir/bigml/inbox")
+-- , ("<fc=sienna4><fn=2>๐Ÿ–„ </fn></fc>", "~/var/maildir/bigml/support")
+-- ]
+-- "mail"
masterVol =
Volume "default" "Master"
["-t", "<status> <volume>"
, "--", "-C", "black", "-c", "sienna4", "-O", ""
- , "-o", " ร—"] 10
+ , "-o", " <fn=4>๐Ÿ”‡</fn>"] 10
captureVol = Volume "default" "Capture" ["-t", "<volume>"] 10