aboutsummaryrefslogtreecommitdiff
path: root/stumpwm/keybinds.lisp
diff options
context:
space:
mode:
authorBardofSprites <bard>2025-09-25 16:54:17 -0400
committerBardofSprites <bard>2025-09-25 16:54:17 -0400
commit78441a99ebc93d8f284a6a64c98fae5ef847184d (patch)
tree27cfc5fb695c8096d15a577a2fea07c36d601616 /stumpwm/keybinds.lisp
parentd0e9b38db5cdbba8c29f730f1c2eb5eb478fa776 (diff)
renamed
Diffstat (limited to 'stumpwm/keybinds.lisp')
-rw-r--r--stumpwm/keybinds.lisp88
1 files changed, 0 insertions, 88 deletions
diff --git a/stumpwm/keybinds.lisp b/stumpwm/keybinds.lisp
deleted file mode 100644
index 6a9e2d7..0000000
--- a/stumpwm/keybinds.lisp
+++ /dev/null
@@ -1,88 +0,0 @@
-(in-package :stumpwm)
-
-;; Remove default binds
-(defvar *gross-default-binds*
- (list "c" "C-c" "e" "C-e" "d" "C-d" "SPC"
- "i" "f" "C-k" "w" "C-w" "a" "C-a"
- "C-t" "o" "TAB" "F" "C-h" "v"
- "#" "m" "C-m" "l" "C-l" "G" "C-N"
- "A" "X" "C-SPC" "I" "r" "W" "+"
- "RET" "C-RET" "C-0" "C-1" "C-2"
- "C-3" "C-4" "C-5" "C-6" "C-7" "\""
- "C-8" "C-9" "0" "1" "2" "3" "4"
- "5" "6" "7" "8" "9"))
-
-;; yuck!
-(dolist (bind *gross-default-binds*)
- (undefine-key *root-map* (kbd bind)))
-
-(set-prefix-key (kbd "s-z"))
-(define-key *top-map* (kbd "s-q") "delete")
-
-;; programs
-(define-key *top-map* (kbd "s-d") "exec dmenu_run")
-(define-key *top-map* (kbd "s-RET") "exec st")
-(define-key *top-map* (kbd "s-e") "emacs")
-(define-key *top-map* (kbd "s-n") "exec emacsclient -c")
-(define-key *top-map* (kbd "s-N") "exec emacs-launcher")
-(define-key *top-map* (kbd "Print") "exec maimpick")
-(define-key *top-map* (kbd "s-X") "exec sysact")
-(define-key *top-map* (kbd "s-p") "exec st -e alsamixer")
-(define-key *top-map* (kbd "s-w") "exec librewolf-bin")
-
-;; media
-(define-key *top-map* (kbd "XF86AudioPlay") "exec playerctl play")
-(define-key *top-map* (kbd "s-P") "exec playerctl pause")
-(define-key *top-map* (kbd "XF86AudioPause") "exec playerctl pause")
-(define-key *top-map* (kbd "XF86AudioNext") "exec playerctl next")
-(define-key *top-map* (kbd "XF86AudioPrev") "exec playerctl previous")
-(define-key *top-map* (kbd "XF86AudioRaiseVolume") "exec pactl set-sink-volume @DEFAULT_SINK@ +5%")
-(define-key *top-map* (kbd "XF86AudioLowerVolume") "exec pactl set-sink-volume @DEFAULT_SINK@ -5%")
-(define-key *top-map* (kbd "XF86AudioMute") "exec pactl set-sink-mute @DEFAULT_SINK@ toggle")
-
-
-;; moving around
-(define-key *top-map* (kbd "s-h") "move-focus left")
-(define-key *top-map* (kbd "s-j") "move-focus down")
-(define-key *top-map* (kbd "s-k") "move-focus up")
-(define-key *top-map* (kbd "s-l") "move-focus right")
-(define-key *top-map* (kbd "s-H") "move-window left")
-(define-key *top-map* (kbd "s-J") "move-window down")
-(define-key *top-map* (kbd "s-K") "move-window up")
-(define-key *top-map* (kbd "s-L") "move-window right")
-
-;; frame movement
-(define-key *root-map* (kbd "v") "hsplit")
-(define-key *root-map* (kbd "s") "vsplit")
-(define-key *root-map* (kbd "d") "remove-split")
-(define-key *root-map* (kbd "V") "hsplit-and-focus")
-(define-key *root-map* (kbd "S") "vsplit-and-focus")
-(define-key *top-map* (kbd "s-Tab") "next-in-frame")
-(define-key *top-map* (kbd "s-ISO_Left_Tab") "prev-in-frame")
-(define-key *top-map* (kbd "s-o") "other-in-frame")
-(define-key *top-map* (kbd "s-O") "other")
-(define-key *top-map* (kbd "s-W") "frame-windowlist")
-
-;; group movement keybinds
-(define-key *top-map* (kbd "s-1") "gselect 1")
-(define-key *top-map* (kbd "s-2") "gselect 2")
-(define-key *top-map* (kbd "s-3") "gselect 3")
-(define-key *top-map* (kbd "s-4") "gselect 4")
-(define-key *top-map* (kbd "s-5") "gselect 5")
-(define-key *top-map* (kbd "s-6") "gselect 6")
-(define-key *top-map* (kbd "s-7") "gselect 7")
-(define-key *top-map* (kbd "s-8") "gselect 8")
-(define-key *top-map* (kbd "s-9") "gselect 9")
-(define-key *top-map* (kbd "s-0") "gselect 10")
-
-;; group shifting
-(define-key *top-map* (kbd "s-S-1") "gmove 1")
-(define-key *top-map* (kbd "s-S-2") "gmove 2")
-(define-key *top-map* (kbd "s-S-3") "gmove 3")
-(define-key *top-map* (kbd "s-S-4") "gmove 4")
-(define-key *top-map* (kbd "s-S-5") "gmove 5")
-(define-key *top-map* (kbd "s-S-6") "gmove 6")
-(define-key *top-map* (kbd "s-S-7") "gmove 7")
-(define-key *top-map* (kbd "s-S-8") "gmove 8")
-(define-key *top-map* (kbd "s-S-9") "gmove 9")
-(define-key *top-map* (kbd "s-S-0") "gmove 10")