Make sure there are no duplicates in location candidates
This commit is contained in:
parent
e50bae5c6b
commit
1f30ab8590
@ -1918,11 +1918,13 @@ the variables `org-agenda-files',
|
||||
org-agenda-files)))
|
||||
|
||||
(scope (cond (use-all-org-files
|
||||
(append (unless current-buffer-is-in-org-agenda-files? ; avoid duplicate entries
|
||||
(list (buffer-file-name default-buffer)))
|
||||
(org-agenda-files)
|
||||
(cl-remove-if-not #'stringp
|
||||
org-agenda-text-search-extra-files)))
|
||||
(->> (append (unless current-buffer-is-in-org-agenda-files? ; avoid duplicate entries
|
||||
(list (buffer-file-name default-buffer)))
|
||||
(org-agenda-files)
|
||||
(cl-remove-if-not #'stringp
|
||||
org-agenda-text-search-extra-files))
|
||||
(-map #'file-truename)
|
||||
(-uniq)))
|
||||
(current-buffer-is-in-org-agenda-files?
|
||||
(org-agenda-files))
|
||||
(t
|
||||
|
||||
Loading…
Reference in New Issue
Block a user