diff options
author | Gregor Kleen <gkleen@yggdrasil.li> | 2022-01-20 23:48:09 +0100 |
---|---|---|
committer | Gregor Kleen <gkleen@yggdrasil.li> | 2022-01-20 23:48:09 +0100 |
commit | 99f7fa13ee3967370c2dbce49c54e834ef9a0565 (patch) | |
tree | ea546ba732489f2238b54b44904cfefebeb63f97 | |
parent | 7b76723a6c33b50fffa6972b384169f11da217bd (diff) | |
download | nixos-99f7fa13ee3967370c2dbce49c54e834ef9a0565.tar nixos-99f7fa13ee3967370c2dbce49c54e834ef9a0565.tar.gz nixos-99f7fa13ee3967370c2dbce49c54e834ef9a0565.tar.bz2 nixos-99f7fa13ee3967370c2dbce49c54e834ef9a0565.tar.xz nixos-99f7fa13ee3967370c2dbce49c54e834ef9a0565.zip |
gkleen@sif: ...
-rw-r--r-- | accounts/gkleen@sif/xmonad/xmonad.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/accounts/gkleen@sif/xmonad/xmonad.hs b/accounts/gkleen@sif/xmonad/xmonad.hs index 853fc47a..a7ecf759 100644 --- a/accounts/gkleen@sif/xmonad/xmonad.hs +++ b/accounts/gkleen@sif/xmonad/xmonad.hs | |||
@@ -572,7 +572,7 @@ main = do | |||
572 | "sif" -> withUrgencyHookC urgencyHook' $ urgencyConfig { suppressWhen = U.Never, remindWhen = Every 2 } | 572 | "sif" -> withUrgencyHookC urgencyHook' $ urgencyConfig { suppressWhen = U.Never, remindWhen = Every 2 } |
573 | _ -> id | 573 | _ -> id |
574 | urgencyHook' window = do | 574 | urgencyHook' window = do |
575 | let blinkLight = (lightHigh >> threadDelay 1e6) `finally` lightLow | 575 | let blinkLight = (lightHigh >> threadDelay 0.5e6) `finally` lightLow |
576 | where | 576 | where |
577 | lightHigh = | 577 | lightHigh = |
578 | writeFile "/sys/class/leds/input0::capslock/brightness" =<< readFile "/sys/class/leds/input0::capslock/max_brightness" | 578 | writeFile "/sys/class/leds/input0::capslock/brightness" =<< readFile "/sys/class/leds/input0::capslock/max_brightness" |