From 2bed84aa1edeae12124d5661602080220f859544 Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Wed, 11 Nov 2020 19:54:13 -0600 Subject: [PATCH] Fix: (org-ql-view--contract-buffers-files) Don't check file exists If the buffer has no filename, this will signal an error. --- org-ql-view.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/org-ql-view.el b/org-ql-view.el index f2c1479..bfe72ba 100644 --- a/org-ql-view.el +++ b/org-ql-view.el @@ -1032,7 +1032,7 @@ current buffer. Otherwise BUFFERS-FILES is returned unchanged." "buffer") ((or 'org-agenda-files '(function org-agenda-files)) "org-agenda-files") - ((and (pred bufferp) (guard (file-exists-p (buffer-file-name buffers-files)))) + ((and (pred bufferp) (guard (buffer-file-name buffers-files))) (buffer-file-name buffers-files)) (_ (let ((print-length nil)) (prin1-to-string buffers-files))))))