[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/embark 6771380 4/5: Allow binding abort-recursive-edit
From: |
ELPA Syncer |
Subject: |
[elpa] externals/embark 6771380 4/5: Allow binding abort-recursive-edit in embark maps |
Date: |
Wed, 3 Nov 2021 13:57:17 -0400 (EDT) |
branch: externals/embark
commit 6771380392f32c55b9531592bbd6795a03c75011
Author: Miha Rihtaršič <miha@kamnitnik.top>
Commit: Miha Rihtaršič <miha@kamnitnik.top>
Allow binding abort-recursive-edit in embark maps
---
embark.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/embark.el b/embark.el
index e685a27..20d6231 100644
--- a/embark.el
+++ b/embark.el
@@ -1007,10 +1007,10 @@ UPDATE is the indicator update function."
(let ((overriding-terminal-local-map overriding-terminal-local-map))
(command-execute cmd)))
(embark-keymap-prompter keymap update))
- ((guard (lookup-key keymap keys)) ; if directly bound, then obey
- cmd)
((or 'minibuffer-keyboard-quit 'abort-recursive-edit 'abort-minibuffers)
nil)
+ ((guard (lookup-key keymap keys)) ; if directly bound, then obey
+ cmd)
('self-insert-command
(minibuffer-message "Not an action")
(embark-keymap-prompter keymap update))