mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 13:32:52 +00:00
Remove duplicate candidates when setting tags
* lisp/org.el (org-set-tags): Remove duplicate candidates from menu.
This commit is contained in:
parent
e0acd8a15a
commit
77b4fad528
15
lisp/org.el
15
lisp/org.el
|
@ -15025,13 +15025,14 @@ When JUST-ALIGN is non-nil, only align tags."
|
|||
(let* ((table
|
||||
(setq
|
||||
org-last-tags-completion-table
|
||||
(append
|
||||
org-tag-persistent-alist
|
||||
(or org-tag-alist (org-get-buffer-tags))
|
||||
(and
|
||||
org-complete-tags-always-offer-all-agenda-tags
|
||||
(org-global-tags-completion-table
|
||||
(org-agenda-files))))))
|
||||
(delete-dups
|
||||
(append
|
||||
org-tag-persistent-alist
|
||||
(or org-tag-alist (org-get-buffer-tags))
|
||||
(and
|
||||
org-complete-tags-always-offer-all-agenda-tags
|
||||
(org-global-tags-completion-table
|
||||
(org-agenda-files)))))))
|
||||
(current-tags (org-split-string current ":"))
|
||||
(inherited-tags
|
||||
(nreverse (nthcdr (length current-tags)
|
||||
|
|
Loading…
Reference in a new issue