summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--.stumpwm.d/keybindings.lisp17
1 files changed, 16 insertions, 1 deletions
diff --git a/.stumpwm.d/keybindings.lisp b/.stumpwm.d/keybindings.lisp
index 2a97fcb..db0b521 100644
--- a/.stumpwm.d/keybindings.lisp
+++ b/.stumpwm.d/keybindings.lisp
@@ -57,8 +57,23 @@
;; Next
(define-key *top-map* (kbd "s-n") "fnext")
-;Groups
+;;Groups
;; Switch to group
+;; Root map
+(define-key *root-map* (kbd "1") "gselect 1")
+(define-key *root-map* (kbd "2") "gselect 2")
+(define-key *root-map* (kbd "3") "gselect 3")
+(define-key *root-map* (kbd "4") "gselect 4")
+(define-key *root-map* (kbd "5") "gselect 5")
+(define-key *root-map* (kbd "0") "gselect")
+;; Move winodw
+(define-key *root-map* (kbd "M-1") "gmove 1")
+(define-key *root-map* (kbd "M-2") "gmove 2")
+(define-key *root-map* (kbd "M-3") "gmove 3")
+(define-key *root-map* (kbd "M-4") "gmove 4")
+(define-key *root-map* (kbd "M-5") "gmove 5")
+(define-key *root-map* (kbd "M-0") "gmove")
+;; Top map, using super
(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")