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

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

[elpa] externals/org 6acc58c9c6: * lisp/org.el (org-get-buffer-tags): Re


From: ELPA Syncer
Subject: [elpa] externals/org 6acc58c9c6: * lisp/org.el (org-get-buffer-tags): Remove text properties from tags
Date: Thu, 11 Aug 2022 07:57:45 -0400 (EDT)

branch: externals/org
commit 6acc58c9c6bcfd45dcc5964cac7e3df8347121cc
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    * lisp/org.el (org-get-buffer-tags): Remove text properties from tags
    
    Do not preserve buffer text properties.  They may will be shown in the
    completion as well, which is not expected by users.
    
    Fixes 
https://orgmode.org/list/CAKJdtO_0aUmiKFjS34hoD525vMFkUJuVCCzGrFfR_Lt2_Vm58g@mail.gmail.com
---
 lisp/org.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index 3b1caecf11..4eef56f455 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -11961,7 +11961,9 @@ Inherited tags have the `inherited' text property."
         (org-element-cache-map
          (lambda (el)
            (dolist (tag (org-element-property :tags el))
-             (puthash (list tag) t hashed))))
+             ;; Do not carry over the text properties.  They may look
+             ;; ugly in the completion.
+             (puthash (list (substring-no-properties tag)) t hashed))))
         (dolist (tag org-file-tags) (puthash (list tag) t hashed))
         (hash-table-keys hashed))
     (org-with-point-at 1



reply via email to

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