X-Git-Url: https://git.shemshak.org/gitweb.cgi/~bandali/configs/blobdiff_plain/1f5c92ffb2a1c3cb52b01195e664876be7b69047..3cfa96bd81ec5dc18bce405324e6a1db2f70524f:/.emacs.d/lisp/bandali-exwm.el

diff --git a/.emacs.d/lisp/bandali-exwm.el b/.emacs.d/lisp/bandali-exwm.el
index 4395d61..f94757d 100644
--- a/.emacs.d/lisp/bandali-exwm.el
+++ b/.emacs.d/lisp/bandali-exwm.el
@@ -61,7 +61,7 @@ around if needed."
 ;; shorten 'C-c C-q' to 'C-q'
 (define-key exwm-mode-map [?\C-q] #'exwm-input-send-next-key)
 
-(csetq exwm-workspace-number 4
+(csetq exwm-workspace-number 10
        exwm-input-global-keys
        `(([?\s-R] . exwm-reset)
          ([?\s-\\] . exwm-workspace-switch)
@@ -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)
@@ -194,7 +203,7 @@ around if needed."
           (lambda ()
             (when exwm-class-name
               (cond
-               ((string= exwm-class-name "IceCat")
+               ((member exwm-class-name '("IceCat" "Iceweasel"))
                 (exwm-input-set-local-simulation-keys
                  `(,@exwm-input-simulation-keys
                    ([?\C-\S-d] . [?\C-d]))))