summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-01-07 00:40:48 +0000
committerjao <jao@gnu.org>2021-01-07 00:41:12 +0000
commitb8ea40877439321132e67a6a785f3e1700be2c9c (patch)
treec1c685032a1885f39dca10b929ecbe31af8298d3 /src
parentcb9108df0ba606e66cdc85e8d68ea09941e89233 (diff)
downloadxmobar-config-b8ea40877439321132e67a6a785f3e1700be2c9c.tar.gz
xmobar-config-b8ea40877439321132e67a6a785f3e1700be2c9c.tar.bz2
colourful kbd indicator
Diffstat (limited to 'src')
-rw-r--r--src/Top.hs2
-rw-r--r--src/TopC.hs2
-rw-r--r--src/lib/Monitors.hs5
3 files changed, 5 insertions, 4 deletions
diff --git a/src/Top.hs b/src/Top.hs
index 4ee2ab8..24a3dc2 100644
--- a/src/Top.hs
+++ b/src/Top.hs
@@ -16,7 +16,7 @@ config p = (baseConfig p) {
, Run (diskIO p)
, Run (coreTemp p)
, Run brightness
- , Run kbd
+ , Run (kbd p)
, Run XMonadLog
, Run (batt p)
]
diff --git a/src/TopC.hs b/src/TopC.hs
index e2f4891..61940d9 100644
--- a/src/TopC.hs
+++ b/src/TopC.hs
@@ -52,7 +52,7 @@ config p = (baseConfig p) {
, Run (diskU p)
, Run (diskIOL p)
, Run brightness'
- , Run kbd
+ , Run (kbd p)
, Run (iconBatt p)
, Run (wireless p "wlp1s0")
, Run (dynNetwork p)
diff --git a/src/lib/Monitors.hs b/src/lib/Monitors.hs
index 1441cf9..d4c5b17 100644
--- a/src/lib/Monitors.hs
+++ b/src/lib/Monitors.hs
@@ -60,7 +60,7 @@ multiCPU p = MultiCpu (p <~> ["-t", "<autototal>"
cpuBars p = MultiCpu (mkArgs p
["--template" , "<autoipat> <total>%"
- , "-L", "50", "-H", "85", "-w", "2"]
+ , "-L", "50", "-H", "85", "-w", "3"]
["--fallback-icon-pattern", "<icon=load_%%.xpm/>"
, "--contiguous-icons"])
10
@@ -189,7 +189,8 @@ masterVol p =
captureVol = Volume "default" "Capture" ["-t", "<volume>"] 10
-kbd = Kbd [("us", ""), ("us(intl)", fni " \xf11c")] -- " ⃣"
+kbd p = Kbd [("us", kbi pDim), ("(unnamed)", kbi pDim), ("us(intl)", kbi pHigh)]
+ where kbi a = fc (a p) (fni " \xf11c")
brightness = Brightness ["--", "-D", "intel_backlight"] 10
brightness' = Brightness ["--", "-D", "amdgpu_bl0", "-C", "brightness"] 10