[stumpwm] fix powerstate commands

This commit is contained in:
Marcel Kapfer 2021-11-18 18:51:49 +01:00
parent cd3af2fe9f
commit baca853691
Signed by: mmk2410
GPG key ID: CADE6F0C09F21B09

View file

@ -160,10 +160,10 @@
;; computer power state keys
(defvar *powerstate-frame-bindings*
(let ((m (make-sparse-keymap)))
(define-key m (kbd "M-s") "systemctl suspend")
(define-key m (kbd "M-p") "systemctl poweroff")
(define-key m (kbd "M-r") "systemctl reboot")
(define-key m (kbd "M-h") "systemctl hibernate")
(define-key m (kbd "M-s") "exec systemctl suspend")
(define-key m (kbd "M-p") "exec systemctl poweroff")
(define-key m (kbd "M-r") "exec systemctl reboot")
(define-key m (kbd "M-h") "exec systemctl hibernate")
m))
(define-key *root-map* (kbd "C-F12") '*powerstate-frame-bindings*)