Tidy: (org-ql-view-bookmark-make-record)

This commit is contained in:
Adam Porter 2020-11-14 20:36:28 -06:00
parent 0a2b751464
commit 5b401cd8b7

View file

@ -557,8 +557,7 @@ dates in the past, and negative for dates in the future."
(cl-etypecase buffers-files (cl-etypecase buffers-files
(string buffers-files) (string buffers-files)
(buffer (file-nameize buffers-files)) (buffer (file-nameize buffers-files))
(list (cl-loop for b-f in buffers-files (list (mapcar #'file-nameize buffers-files)))))
collect (file-nameize b-f))))))
(list (concat "Org QL View: " org-ql-view-title) (list (concat "Org QL View: " org-ql-view-title)
(cons 'org-ql-view-plist plist) (cons 'org-ql-view-plist plist)
(cons 'handler #'org-ql-view-bookmark-handler) (cons 'handler #'org-ql-view-bookmark-handler)