Add keyboard escape quit to commands which exit visual state

Fixes #1886
emacs-evil · Apr 13, 2024 · 27c9dce · 27c9dce
1 parent 0d40434
commit 27c9dce
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/evil-states.el b/evil-states.el
@@ -345,7 +345,7 @@ otherwise exit Visual state."
   (when (evil-visual-state-p)
     (setq command (or command this-command))
     (if (or quit-flag
-            (eq command #'keyboard-quit)
+            (memq command '(keyboard-quit keyboard-escape-quit))
             ;; Is `mark-active' nil for an unexpanded region?
             deactivate-mark
             (and (not evil-visual-region-expanded)