emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fix: prevent quit in the middle of doom/escape

Browse source
This commit is contained in:
Henrik Lissner 2023-09-12 18:56:01 +02:00
parent 7acb67285c
commit f26b038ec3
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
1 changed files with 13 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/doom-keybinds.el
View file

@ -93,6 +93,7 @@ all hooks after it are ignored.")
(defun doom/escape (&optional interactive) (defun doom/escape (&optional interactive)
"Run `doom-escape-hook'." "Run `doom-escape-hook'."
(interactive (list 'interactive)) (interactive (list 'interactive))
(let ((inhibit-quit t))
(cond ((minibuffer-window-active-p (minibuffer-window)) (cond ((minibuffer-window-active-p (minibuffer-window))
;; quit the minibuffer if open. ;; quit the minibuffer if open.
(when interactive (when interactive
@ -105,7 +106,7 @@ all hooks after it are ignored.")
;; Back to the default ;; Back to the default
((unwind-protect (keyboard-quit) ((unwind-protect (keyboard-quit)
(when interactive (when interactive
(setq this-command 'keyboard-quit)))))) (setq this-command 'keyboard-quit)))))))
(global-set-key [remap keyboard-quit] #'doom/escape) (global-set-key [remap keyboard-quit] #'doom/escape)