EXWM: Bind s-backspace by default
parent
0a8bc9be74
commit
2548b77d8b
|
@ -116,6 +116,8 @@
|
|||
(when (fboundp 'helm-pass)
|
||||
(exwm-input-set-key (kbd "s-p") #'helm-pass))
|
||||
|
||||
(autoload 'ambrevar/slime-to-repl "lisp")
|
||||
(exwm-input-set-key (kbd "s-<backspace>") #'ambrevar/slime-switch-to-repl)
|
||||
(defun ambrevar/repl-switcher ()
|
||||
"Switch between Geiser and SLIME REPLs."
|
||||
(interactive)
|
||||
|
@ -126,7 +128,6 @@
|
|||
(exwm-input-set-key (kbd "s-<backspace>") #'helm-geiser-repl-switch)
|
||||
(exwm-input-set-key (kbd "S-s-<backspace>") #'helm-geiser-repl-switch-other-window))
|
||||
("slime"
|
||||
(autoload 'ambrevar/slime-to-repl "lisp")
|
||||
(exwm-input-set-key (kbd "s-<backspace>") #'ambrevar/slime-switch-to-repl))))
|
||||
(exwm-input-set-key (kbd "s-C-<backspace>") #'ambrevar/repl-switcher)
|
||||
|
||||
|
|
Loading…
Reference in New Issue