EXWM: Fix case->pcase and t->_

master
Pierre Neidhardt 2017-07-27 14:09:18 +01:00
parent 4511f9d8ca
commit 57997da0b2
1 changed files with 3 additions and 3 deletions

View File

@ -96,8 +96,8 @@
;; TODO: Check out the 'volume' package.
(let (mixer vol-up vol-down vol-toggle)
(case system-type
(gnu/linux
(pcase system-type
('gnu/linux
(defun exwm-start-volume-down ()
"Lower volume 5% with amixer"
(interactive)
@ -113,7 +113,7 @@
(interactive)
(let ((cmd "amixer set Master toggle >/dev/null"))
(start-process-shell-command cmd nil cmd))))
(t
(_
(defun exwm-start-volume-down ()
"Lower volume 5% with mixer"
(interactive)