Don't close splits on `keyboard-escape-quit'
This commit is contained in:
parent
4319869f80
commit
5ea81465c3
4
init.el
4
init.el
|
@ -34,6 +34,10 @@
|
|||
;; C-h deletes backward - see https://idiomdrottning.org/bad-emacs-defaults
|
||||
(global-set-key (kbd "C-h") 'delete-backward-char)
|
||||
(keyboard-translate ?\C-h ?\C-?))
|
||||
(define-advice keyboard-escape-quit (:around (fn &rest r))
|
||||
"Don't close splits on `keyboard-escape-quit'."
|
||||
(let ((buffer-quit-function #'ignore))
|
||||
(apply fn r)))
|
||||
|
||||
(setup (:require +init)
|
||||
(:bind "C-c s" (lambda ()
|
||||
|
|
Loading…
Reference in New Issue