emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/evil-escape cf3e18673d 051/133: Undefine mapping on first


From: ELPA Syncer
Subject: [nongnu] elpa/evil-escape cf3e18673d 051/133: Undefine mapping on first key when evil-escape is disabled
Date: Wed, 3 Jan 2024 21:59:51 -0500 (EST)

branch: elpa/evil-escape
commit cf3e18673d05ff49929bfcdf6c0c8dc43fad826d
Author: syl20bnr <sylvain.benner@gmail.com>
Commit: syl20bnr <sylvain.benner@gmail.com>

    Undefine mapping on first key when evil-escape is disabled
    
    Fixes #21
---
 evil-escape.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/evil-escape.el b/evil-escape.el
index 1827593fa6..8fa5551aab 100644
--- a/evil-escape.el
+++ b/evil-escape.el
@@ -253,6 +253,13 @@ with a key sequence."
 (defun evil-escape--undefine-keys ()
   "Unset the key bindings defined in `evil-escape--define-keys'."
   (let ((first-key (evil-escape--first-key)))
+    ;; bulk undefine
+    (dolist (map '(evil-insert-state-map
+                   evil-emacs-state-map
+                   evil-visual-state-map
+                   minibuffer-local-map
+                   evil-ex-completion-map))
+      (define-key (eval map) first-key nil))
     ;; motion state
     (if evil-escape-motion-state-shadowed-func
         (define-key evil-motion-state-map



reply via email to

[Prev in Thread] Current Thread [Next in Thread]