Don't close splits on `keyboard-escape-quit'

This commit is contained in:
Case Duckworth 2021-12-28 22:14:43 -06:00
parent 4319869f80
commit 5ea81465c3
1 changed files with 4 additions and 0 deletions

View File

@ -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 ()