diff options
| author | Jeschli <jeschli@gmail.com> | 2020-04-22 12:35:00 +0200 |
|---|---|---|
| committer | Jeschli <jeschli@gmail.com> | 2020-04-22 12:35:00 +0200 |
| commit | a19f904d940ba51cdbe22adc49e8f4ff735c2029 (patch) | |
| tree | a931f3e825dcd82c791b512fd7c0cf5d9e91f2e1 /tv/5pkgs/haskell/xmonad-tv/src/main.hs | |
| parent | 9d62e48c8011fae4c0df8d797fc964282f2d7655 (diff) | |
| parent | e613c199203b9f90cc7e4f97c7b1825abb02aa56 (diff) | |
Merge branch 'master' of https://cgit.lassul.us/stockholm
Diffstat (limited to 'tv/5pkgs/haskell/xmonad-tv/src/main.hs')
| -rw-r--r-- | tv/5pkgs/haskell/xmonad-tv/src/main.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tv/5pkgs/haskell/xmonad-tv/src/main.hs b/tv/5pkgs/haskell/xmonad-tv/src/main.hs index c528017..400c87a 100644 --- a/tv/5pkgs/haskell/xmonad-tv/src/main.hs +++ b/tv/5pkgs/haskell/xmonad-tv/src/main.hs @@ -160,6 +160,7 @@ myKeys conf = Map.fromList $ , ((0, xF86XK_AudioLowerVolume), audioLowerVolume) , ((0, xF86XK_AudioRaiseVolume), audioRaiseVolume) , ((0, xF86XK_AudioMute), audioMute) + , ((_4, xF86XK_AudioMute), pavucontrol []) , ((_4, xK_Prior), forkFile Paths.xcalib ["-invert", "-alter"] Nothing) ] @@ -175,6 +176,8 @@ myKeys conf = Map.fromList $ _4SM = _4 .|. _S .|. _M pactl args = forkFile Paths.pactl args Nothing + pavucontrol args = forkFile Paths.pavucontrol args Nothing + audioLowerVolume = pactl ["--", "set-sink-volume", "@DEFAULT_SINK@", "-5%"] audioRaiseVolume = pactl ["--", "set-sink-volume", "@DEFAULT_SINK@", "+5%"] audioMute = pactl ["--", "set-sink-mute", "@DEFAULT_SINK@", "toggle"] |