--- a/stumpwmrc Thu Nov 09 12:24:16 2023 -0500
+++ b/stumpwmrc Fri Nov 10 13:00:47 2023 -0500
@@ -663,6 +663,13 @@
(isk-u-Æ "M-H" "AE"))
+(defcommand thinkpad-ret () ()
+ (send-key (kbd "RET")))
+
+(defcommand thinkpad-bs () ()
+ (send-key (kbd "BackSpace")))
+
+
;;;; Key Mapping --------------------------------------------------------------
;;; Conventions:
;;;
@@ -779,6 +786,11 @@
("H-BackSpace" "remove")
("S-H-BackSpace" "kill-and-remove"))
+(define-top-keys ;; broken thinkpad keys
+ ("s-m" "thinkpad-ret")
+ ("s-Delete" "thinkpad-bs"))
+
+
(define-top-keys ;; naming
("H-'" "title"))