removing duplcates when expanding buffers-files

This commit is contained in:
Ahmed Shariff 2021-07-19 00:19:52 -05:00
parent b68d836562
commit cabf88eea5

View file

@ -1091,10 +1091,11 @@ The counterpart to `org-ql-view--contract-buffers-files'."
((pred listp) (list _buffers-files))
;; A single filename.
((pred stringp) (list _buffers-files)))))
(-mapcat #'process-buffers-files-elements
(remove-duplicates (-mapcat #'process-buffers-files-elements
(remove nil (if (listp buffers-files)
buffers-files
(list buffer-files))))))
(list buffer-files))))
:test 'equalp)))
(defun org-ql-view--complete-super-groups ()
"Return value for `org-ql-view-super-groups' using completion."