summaryrefslogtreecommitdiff
path: root/accounts/gkleen@sif/xmonad
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2022-03-15 21:55:55 +0100
committerGregor Kleen <gkleen@yggdrasil.li>2022-03-15 21:55:55 +0100
commitc65b6b37316b97e7235468f35b54419a7fafc1b4 (patch)
tree17fef17acd35a46fd2f0a9b6ee3610b158d790ba /accounts/gkleen@sif/xmonad
parentc5b6424979731bf7a5ea879520072cc52f4d2cb8 (diff)
downloadnixos-c65b6b37316b97e7235468f35b54419a7fafc1b4.tar
nixos-c65b6b37316b97e7235468f35b54419a7fafc1b4.tar.gz
nixos-c65b6b37316b97e7235468f35b54419a7fafc1b4.tar.bz2
nixos-c65b6b37316b97e7235468f35b54419a7fafc1b4.tar.xz
nixos-c65b6b37316b97e7235468f35b54419a7fafc1b4.zip
gkleen@sif: ...
Diffstat (limited to 'accounts/gkleen@sif/xmonad')
-rw-r--r--accounts/gkleen@sif/xmonad/xmonad.hs11
1 files changed, 5 insertions, 6 deletions
diff --git a/accounts/gkleen@sif/xmonad/xmonad.hs b/accounts/gkleen@sif/xmonad/xmonad.hs
index dfcd3083..ac6a4aba 100644
--- a/accounts/gkleen@sif/xmonad/xmonad.hs
+++ b/accounts/gkleen@sif/xmonad/xmonad.hs
@@ -865,8 +865,8 @@ myKeys' conf host = Map.fromList $
865 , ((0, xF86XK_AudioPlay), mediaMpvTogglePause) 865 , ((0, xF86XK_AudioPlay), mediaMpvTogglePause)
866 , ((modm .|. mod1Mask, xK_space), mediaMpvTogglePause) 866 , ((modm .|. mod1Mask, xK_space), mediaMpvTogglePause)
867 867
868 , ((0, xF86XK_MonBrightnessDown), backlight (subtract 5)) 868 , ((0, xF86XK_MonBrightnessDown), backlight . cycleThrough $ reverse brCycle)
869 , ((0, xF86XK_MonBrightnessUp), backlight (+ 5)) 869 , ((0, xF86XK_MonBrightnessUp), backlight $ cycleThrough brCycle)
870 870
871 , ((modm , xK_Escape), cycleKbLayout (hKbLayouts host)) 871 , ((modm , xK_Escape), cycleKbLayout (hKbLayouts host))
872 , ((modm .|. controlMask, xK_Escape), safeSpawn "setxkbmap" $ fst (head $ hKbLayouts host) : maybeToList (snd . head $ hKbLayouts host)) 872 , ((modm .|. controlMask, xK_Escape), safeSpawn "setxkbmap" $ fst (head $ hKbLayouts host) : maybeToList (snd . head $ hKbLayouts host))
@@ -891,10 +891,8 @@ myKeys' conf host = Map.fromList $
891 ) 891 )
892 , ((modm .|. shiftMask, xK_s ), safeSpawn "systemctl" ["suspend"]) 892 , ((modm .|. shiftMask, xK_s ), safeSpawn "systemctl" ["suspend"])
893 , ((modm .|. shiftMask, xK_h ), safeSpawn "systemctl" ["hibernate"]) 893 , ((modm .|. shiftMask, xK_h ), safeSpawn "systemctl" ["hibernate"])
894 , ((modm .|. shiftMask, xK_b ), backlight $ cycleThrough [1, 3 % 4, 1 % 2, 1 % 4, 1 % 10, 1 % 100, 0] 894 -- , ((modm .|. shiftMask, xK_b ), backlight . cycleThrough $ reverse brCycle)
895 ) 895 -- , ((modm .|. shiftMask .|. controlMask, xK_b), backlight $ cycleThrough brCycle)
896 , ((modm .|. shiftMask .|. controlMask, xK_b), backlight $ cycleThrough [0, 1 % 100, 1 % 10, 1 % 4, 1 % 2, 3 % 4, 1]
897 )
898 , ((modm, xK_v ), windows copyToAll) -- @@ Make focused window always visible 896 , ((modm, xK_v ), windows copyToAll) -- @@ Make focused window always visible
899 , ((modm .|. shiftMask, xK_v ), killAllOtherCopies) -- @@ Toggle window state back 897 , ((modm .|. shiftMask, xK_v ), killAllOtherCopies) -- @@ Toggle window state back
900 , ((modm .|. shiftMask, xK_g ), windowPrompt xPConfig Goto wsWindows) 898 , ((modm .|. shiftMask, xK_g ), windowPrompt xPConfig Goto wsWindows)
@@ -922,4 +920,5 @@ myKeys' conf host = Map.fromList $
922 where 920 where
923 modm = XMonad.modMask conf 921 modm = XMonad.modMask conf
924 922
923 brCycle = [0, 1 % 100, 1 % 10, 1 % 4, 1 % 2, 3 % 4, 1]
925 924