2c74f844352e

More
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Fri, 29 Mar 2024 16:16:57 -0400
parents 417f91fae3c2
children 4f28fbfd7d63
branches/tags (none)
files stumpwm/key-mapping.lisp stumpwm/terminal-fonts.lisp vim/custom-dictionary.utf-8.add

Changes

--- 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