mmk2410/dotfiles
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

[stumpwm] fix powerstate commands

Browse source
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
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
stumpwm/stumpwmrc
View file

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