--- a/stumpwm/key-mapping.lisp Thu Mar 28 16:06:55 2024 -0400
+++ b/stumpwm/key-mapping.lisp Fri Mar 29 16:16:57 2024 -0400
@@ -47,6 +47,9 @@
("H-V" "vlc")
("H-e" "budget")
("H-E" "spend")
+ ("S-XF86AudioMute" "terminal-font-size-show")
+ ("S-XF86AudioRaiseVolume" "terminal-font-size-down") ; todo unfuck the backwards mapping in qmk
+ ("S-XF86AudioLowerVolume" "terminal-font-size-up")
("C-BackSpace" "clear-notifications"))
(define-top-keys ;; clipboard
--- a/stumpwm/terminal-fonts.lisp Thu Mar 28 16:06:55 2024 -0400
+++ b/stumpwm/terminal-fonts.lisp Fri Mar 29 16:16:57 2024 -0400
@@ -11,6 +11,15 @@
(defcommand reload-terminal-font-size () ()
(setf *terminal-font-size* (read-terminal-font-size-from-config)))
+(defcommand terminal-font-size-show () ()
+ (message "~D" *terminal-font-size*))
+
+(defcommand terminal-font-size-up () ()
+ (message "~D" (incf *terminal-font-size*)))
+
+(defcommand terminal-font-size-down () ()
+ (message "~D" (setf *terminal-font-size* (max 6 (1- *terminal-font-size*)))))
+
(defcommand st-font-up () ()
(loop :repeat 7 :do (meta (kbd "C-S-SunPageUp"))))
--- a/vim/custom-dictionary.utf-8.add Thu Mar 28 16:06:55 2024 -0400
+++ b/vim/custom-dictionary.utf-8.add Fri Mar 29 16:16:57 2024 -0400
@@ -433,3 +433,4 @@
Taubman
H3K27M
polycomb
+Cristian