summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--.emacs.d/init.el13
1 files changed, 7 insertions, 6 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 3f1c363..4102df0 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -656,10 +656,10 @@ around if needed."
(number-sequence 0 (1- exwm-workspace-number)))
([?\s-t] . exwm-floating-toggle-floating)
([?\s-f] . exwm-layout-toggle-fullscreen)
- ([?\s-w] . (lambda ()
+ ([?\s-W] . (lambda ()
(interactive)
(kill-buffer (current-buffer))))
- ([?\s-q] . (lambda ()
+ ([?\s-Q] . (lambda ()
(interactive)
(exwm-manage--kill-client)))
([?\s-\'] . (lambda ()
@@ -725,7 +725,10 @@ around if needed."
;; search
([?\C-s] . [?\C-f])
;; escape
- ([?\C-g] . [escape]))))
+ ([?\C-g] . [escape])
+ ;; window
+ ([?\s-w] . [?\C-w])
+ ([?\s-q] . [?\C-q]))))
(use-feature exwm-manage
:demand
@@ -737,9 +740,7 @@ around if needed."
((string= exwm-class-name "Abrowser")
(exwm-input-set-local-simulation-keys
`(,@exwm-input-simulation-keys
- ([?\C-\S-d] . [?\C-d])
- ([?\C-q] . [?\C-w])
- ([?\s-q] . [?\C-q]))))
+ ([?\C-\S-d] . [?\C-d]))))
((string= exwm-class-name "URxvt")
(exwm-input-set-local-simulation-keys
'(([?\C-c ?\C-c] . [?\C-c])