From 5b401cd8b79086f6cdcca0bd22ef4267efa80851 Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Sat, 14 Nov 2020 20:36:28 -0600 Subject: [PATCH] Tidy: (org-ql-view-bookmark-make-record) --- org-ql-view.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/org-ql-view.el b/org-ql-view.el index e4ac4c5..f5f7fb7 100644 --- a/org-ql-view.el +++ b/org-ql-view.el @@ -557,8 +557,7 @@ dates in the past, and negative for dates in the future." (cl-etypecase buffers-files (string buffers-files) (buffer (file-nameize buffers-files)) - (list (cl-loop for b-f in buffers-files - collect (file-nameize b-f)))))) + (list (mapcar #'file-nameize buffers-files))))) (list (concat "Org QL View: " org-ql-view-title) (cons 'org-ql-view-plist plist) (cons 'handler #'org-ql-view-bookmark-handler)