From b146cf9bccd6f491120230e46dbbe2b5acab6b25 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Sat, 15 Jul 2023 01:30:43 -0700 Subject: [PATCH] Add screenshot bindings to stumpwm --- oni/home/services/stumpwm/config | 15 +++++++++++++++ 1 file changed, 15 insertions(+) diff --git a/oni/home/services/stumpwm/config b/oni/home/services/stumpwm/config index ad57226..2bfa08c 100644 --- a/oni/home/services/stumpwm/config +++ b/oni/home/services/stumpwm/config @@ -141,6 +141,21 @@ after it has been unlocked." (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") (define-frame-preference "Default"