From b8ea40877439321132e67a6a785f3e1700be2c9c Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 7 Jan 2021 00:40:48 +0000 Subject: colourful kbd indicator --- src/Top.hs | 2 +- src/TopC.hs | 2 +- src/lib/Monitors.hs | 5 +++-- 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", "" cpuBars p = MultiCpu (mkArgs p ["--template" , " %" - , "-L", "50", "-H", "85", "-w", "2"] + , "-L", "50", "-H", "85", "-w", "3"] ["--fallback-icon-pattern", "" , "--contiguous-icons"]) 10 @@ -189,7 +189,8 @@ masterVol p = captureVol = Volume "default" "Capture" ["-t", ""] 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 -- cgit v1.2.3