From fc3ece0b1a0ab6bca8d2e8ee44518981de2cfdd1 Mon Sep 17 00:00:00 2001 From: Azat Bahawi Date: Sun, 12 Jan 2020 17:57:07 +0300 Subject: Minor fixes to keybinds and scripts --- src/XMonad/Custom/Bindings.hs | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'src/XMonad/Custom/Bindings.hs') diff --git a/src/XMonad/Custom/Bindings.hs b/src/XMonad/Custom/Bindings.hs index 92dd66c..b008b64 100644 --- a/src/XMonad/Custom/Bindings.hs +++ b/src/XMonad/Custom/Bindings.hs @@ -127,9 +127,6 @@ keysSystem _ = , ("" , spawn "~/.xmonad/scripts/screenlock.sh") , ("M-" , spawn "~/.xmonad/scripts/xshot-upload.sh") , ("M-S-" , spawn "~/.xmonad/scripts/xshot-select-upload.sh") - , ("M-" , spawn "~/.xmonad/scripts/xcast.sh --webm") - , ("M-S-" , spawn "~/.xmonad/scripts/xcast.sh --gif") - , ("M-C-" , spawn "pkill ffmpeg") -- FIXME Possible undefined behaviour , ("M-C-c" , spawn "~/.xmonad/scripts/toggle-compton.sh") , ("M-C-r" , spawn "~/.xmonad/scripts/toggle-redshift.sh") , ("M-C-p" , spawn "~/.xmonad/scripts/toggle-touchpad.sh") @@ -138,11 +135,11 @@ keysSystem _ = keysMedia :: XConfig Layout -> [(String, X ())] -- TODO Make audio keys compatible with ALSA/PA at the same time keysMedia _ = - [ ("" , spawn "pactl set-source-mute 1 toggle") -- TODO Add indicator + [ ("" , spawn "pactl set-source-mute 1 toggle") , ("" , spawn "pactl set-sink-mute 0 toggle") , ("" , spawn "pactl set-sink-mute 0 false && pactl set-sink-volume 0 -10%") , ("" , spawn "pactl set-sink-mute 0 false && pactl set-sink-volume 0 +10%") - , ("" , spawn "~/.xmonad/scripts/mpc-play-pause.sh") + , ("" , spawn "mpc toggle") , ("" , spawn "mpc stop") , ("" , spawn "mpc prev") , ("" , spawn "mpc next") -- cgit 1.4.1