From aea662c560fb8fcd37e741adf67be9127f45f03a Mon Sep 17 00:00:00 2001
From: Amin Bandali <bandali@gnu.org>
Date: Mon, 12 Oct 2020 22:13:45 -0400
Subject: Some adaptations for my current EXWM setup

---
 .emacs.d/lisp/bandali-exwm.el | 17 +++++++++++++----
 1 file changed, 13 insertions(+), 4 deletions(-)

(limited to '.emacs.d/lisp/bandali-exwm.el')

diff --git a/.emacs.d/lisp/bandali-exwm.el b/.emacs.d/lisp/bandali-exwm.el
index 4395d61..ff89112 100644
--- a/.emacs.d/lisp/bandali-exwm.el
+++ b/.emacs.d/lisp/bandali-exwm.el
@@ -125,20 +125,29 @@ around if needed."
                        (interactive)
                        (start-process-shell-command
                         "rofi-light" nil "rofi-light")))
-         ([XF86AudioMute] .
+         ([XF86AudioMute] .             ; borken on my X200 :-(
           (lambda ()
             (interactive)
-            (start-process "" nil "amixer" "set" "'Master',0" "toggle")))
+            (start-process "" nil "pamixer" "--toggle-mute")))
+         ([XF86Launch1] .
+          (lambda ()
+            (interactive)
+            (start-process "" nil "pamixer" "--toggle-mute")))
+         ([\s-XF86Launch1] .            ; toggle mic mute
+          (lambda ()
+            (interactive)
+            (start-process
+             "" nil "pamixer" "--default-source" "--toggle-mute")))
          ([XF86AudioLowerVolume] .
           (lambda ()
             (interactive)
             (start-process
-             "" nil "amixer" "set" "'Master',0" "5%-")))
+             "" nil "pamixer" "--allow-boost" "--decrease" "5")))
          ([XF86AudioRaiseVolume] .
           (lambda ()
             (interactive)
             (start-process
-             "" nil "amixer" "set" "'Master',0" "5%+")))
+             "" nil "pamixer" "--allow-boost" "--increase" "5")))
          ([XF86AudioPlay] .
           (lambda ()
             (interactive)
-- 
cgit v1.2.3-83-g751a