[elpa] externals/org 7a4784b122 2/3: org-fast-tag-selection: Fix when C-g is pressed

[ELPA Syncer]

branch: externals/org
commit 7a4784b12294b34af241790947f128b71442ef1b
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-fast-tag-selection: Fix when C-g is pressed
    
    * lisp/org.el (org-fast-tag-selection): Fix "no catch" error.  But do
    not directly set `quit-flag' as it was done in the earlier versions.
    Instead, call `keyboard-quit', allowing it to perform the necessary
    cleanups.
---
 lisp/org.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index 430d9e2741..9fb9e54b72 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -12102,7 +12102,8 @@ Returns the new tags string, or nil to not change the 
current settings."
                    ((or ?\C-g
                         (and ?q (guard (not (rassoc input-char 
tag-table-local)))))
                     (delete-overlay org-tags-overlay)
-                    (throw 'quit nil))
+                     ;; Quit as C-g does.
+                    (keyboard-quit))
                     ;; Clear tags.
                    (?\s
                     (setq current-tags nil)