From c65b6b37316b97e7235468f35b54419a7fafc1b4 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Tue, 15 Mar 2022 21:55:55 +0100 Subject: gkleen@sif: ... --- accounts/gkleen@sif/xmonad/xmonad.hs | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) (limited to 'accounts/gkleen@sif') 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 $ , ((0, xF86XK_AudioPlay), mediaMpvTogglePause) , ((modm .|. mod1Mask, xK_space), mediaMpvTogglePause) - , ((0, xF86XK_MonBrightnessDown), backlight (subtract 5)) - , ((0, xF86XK_MonBrightnessUp), backlight (+ 5)) + , ((0, xF86XK_MonBrightnessDown), backlight . cycleThrough $ reverse brCycle) + , ((0, xF86XK_MonBrightnessUp), backlight $ cycleThrough brCycle) , ((modm , xK_Escape), cycleKbLayout (hKbLayouts host)) , ((modm .|. controlMask, xK_Escape), safeSpawn "setxkbmap" $ fst (head $ hKbLayouts host) : maybeToList (snd . head $ hKbLayouts host)) @@ -891,10 +891,8 @@ myKeys' conf host = Map.fromList $ ) , ((modm .|. shiftMask, xK_s ), safeSpawn "systemctl" ["suspend"]) , ((modm .|. shiftMask, xK_h ), safeSpawn "systemctl" ["hibernate"]) - , ((modm .|. shiftMask, xK_b ), backlight $ cycleThrough [1, 3 % 4, 1 % 2, 1 % 4, 1 % 10, 1 % 100, 0] - ) - , ((modm .|. shiftMask .|. controlMask, xK_b), backlight $ cycleThrough [0, 1 % 100, 1 % 10, 1 % 4, 1 % 2, 3 % 4, 1] - ) + -- , ((modm .|. shiftMask, xK_b ), backlight . cycleThrough $ reverse brCycle) + -- , ((modm .|. shiftMask .|. controlMask, xK_b), backlight $ cycleThrough brCycle) , ((modm, xK_v ), windows copyToAll) -- @@ Make focused window always visible , ((modm .|. shiftMask, xK_v ), killAllOtherCopies) -- @@ Toggle window state back , ((modm .|. shiftMask, xK_g ), windowPrompt xPConfig Goto wsWindows) @@ -922,4 +920,5 @@ myKeys' conf host = Map.fromList $ where modm = XMonad.modMask conf + brCycle = [0, 1 % 100, 1 % 10, 1 % 4, 1 % 2, 3 % 4, 1] -- cgit v1.2.3