ryuslash/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add keybindings for managing dunst in stumpwm

Browse source
This commit is contained in:
Tom Willemse 2023-09-27 23:44:21 -07:00
parent 9ad2400a9a
commit 51a84e941e
1 changed files with 11 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
oni/home/services/stumpwm/config
View file

@ -85,9 +85,20 @@ after it has been unlocked."
(define-key m (kbd "f") "exec flameshot full") (define-key m (kbd "f") "exec flameshot full")
m)) m))
(defvar *notification-bindings*
(let ((m (make-sparse-keymap)))
(define-key m (kbd "RET") "exec dunstctl action")
(define-key m (kbd "c") "exec dunstctl close")
(define-key m (kbd "S-c") "exec dunstctl close-all")
(define-key m (kbd "SPC") "exec dunstctl context")
(define-key m (kbd ",") "exec dunstctl history-pop")
(define-key m (kbd "p") "exec dunstctl set-paused toggle")
m))
(defvar *user-bindings* (defvar *user-bindings*
(let ((m (make-sparse-keymap))) (let ((m (make-sparse-keymap)))
(define-key m (kbd "s") '*screenshot-bindings*) (define-key m (kbd "s") '*screenshot-bindings*)
(define-key m (kbd "n") '*notification-bindings*)
m)) m))
(define-key *top-map* (kbd "s-c") '*user-bindings*) (define-key *top-map* (kbd "s-c") '*user-bindings*)