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

Add screenshot bindings to stumpwm

Browse source
This commit is contained in:
Tom Willemse 2023-07-15 01:30:43 -07:00
parent 1af8952d27
commit b146cf9bcc
1 changed files with 15 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -141,6 +141,21 @@ after it has been unlocked."
(swm-gaps:toggle-gaps-on) (swm-gaps:toggle-gaps-on)
;;; Screenshots
(defvar *screenshot-bindings*
(let ((m (make-sparse-keymap)))
(define-key m (kbd "s") "exec flameshot gui")
(define-key m (kbd "c") "exec flameshot screen")
(define-key m (kbd "f") "exec flameshot full")
m))
(defvar *user-bindings*
(let ((m (make-sparse-keymap)))
(define-key m (kbd "s") '*screenshot-bindings*)))
(define-key *top-map* (kbd "s-c") '*user-bindings*)
(restore-from-file "default") (restore-from-file "default")
(define-frame-preference "Default" (define-frame-preference "Default"