diff --git a/lib/KeyBindings.hs b/lib/KeyBindings.hs index b9c58f6..cc896bd 100644 --- a/lib/KeyBindings.hs +++ b/lib/KeyBindings.hs @@ -36,11 +36,11 @@ modify conf = conf `additionalKeysP` -- Add some extra key bindings: [ ("M-S-q", confirmPrompt promptConfig "exit" (io exitSuccess)) - , ("", spawn "/run/current-system/sw/bin/xbacklight -10") - , ("", spawn "/run/current-system/sw/bin/xbacklight +10") - , ("", spawn "/run/current-system/sw/bin/mpc toggle") - , ("", spawn "/run/current-system/sw/bin/mpc next") - , ("", spawn "/run/current-system/sw/bin/mpc prev") + , ("", spawn "/run/current-system/sw/bin/light -U 10") + , ("", spawn "/run/current-system/sw/bin/light -A 10") + , ("", spawn "/etc/profiles/per-user/e/bin/mpc toggle") + , ("", spawn "/etc/profiles/per-user/e/bin/mpc next") + , ("", spawn "/etc/profiles/per-user/e/bin/mpc prev") , ("M-", windows W.focusDown) , ("M-", sendMessage (Toggle "Full")) , ("M-$", sendMessage (Toggle "Full"))