diff options
Diffstat (limited to '.stumpwm.d/keybindings.lisp')
| -rw-r--r-- | .stumpwm.d/keybindings.lisp | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/.stumpwm.d/keybindings.lisp b/.stumpwm.d/keybindings.lisp index c5f4b9f..96e00bb 100644 --- a/.stumpwm.d/keybindings.lisp +++ b/.stumpwm.d/keybindings.lisp @@ -54,24 +54,24 @@ ;Groups ;; Switch to group -(define-key *root-map* (kbd "M-1") "gselect 1") -(define-key *root-map* (kbd "M-2") "gselect 2") -(define-key *root-map* (kbd "M-3") "gselect 3") -(define-key *root-map* (kbd "M-4") "gselect 4") -(define-key *root-map* (kbd "M-5") "gselect 5") -(define-key *root-map* (kbd "M-6") "gselect 6") -(define-key *root-map* (kbd "M-7") "gselect 7") -(define-key *root-map* (kbd "M-0") "gselect 5") -(define-key *root-map* (kbd "M-9") "gselect") +(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-0") "gselect 5") +(define-key *top-map* (kbd "s-9") "gselect") ;; Move window to group -(define-key *root-map* (kbd "M-!") "gmove 1") -(define-key *root-map* (kbd "M-@") "gmove 2") -(define-key *root-map* (kbd "M-#") "gmove 3") -(define-key *root-map* (kbd "M-$") "gmove 4") -(define-key *root-map* (kbd "M-%") "gmove 5") -(define-key *root-map* (kbd "M-^") "gmove 6") -(define-key *root-map* (kbd "M-)") "gmove 5") -(define-key *root-map* (kbd "M-(") "gmove") +(define-key *top-map* (kbd "s-!") "gmove 1") +(define-key *top-map* (kbd "s-@") "gmove 2") +(define-key *top-map* (kbd "s-#") "gmove 3") +(define-key *top-map* (kbd "s-$") "gmove 4") +(define-key *top-map* (kbd "s-%") "gmove 5") +(define-key *top-map* (kbd "s-^") "gmove 6") +(define-key *top-map* (kbd "s-)") "gmove 5") +(define-key *top-map* (kbd "s-(") "gmove") ;; Focus (define-key *root-map* (kbd "M-b") "move-window left") (define-key *root-map* (kbd "M-f") "move-window right") |