jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

removing duplcates when expanding buffers-files

Browse source
This commit is contained in:
Ahmed Shariff 2021-07-19 00:19:52 -05:00
parent b68d836562
commit cabf88eea5
1 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

9
org-ql-view.el
View file

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