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

Fix: (org-ql-view--contract-buffers-files) Don't check file exists

Browse source 
If the buffer has no filename, this will signal an error.
This commit is contained in:
Adam Porter 2020-11-11 19:54:13 -06:00
parent f8d671a7b8
commit 2bed84aa1e
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
org-ql-view.el
View file

@ -1032,7 +1032,7 @@ current buffer. Otherwise BUFFERS-FILES is returned unchanged."
"buffer") "buffer")
((or 'org-agenda-files '(function org-agenda-files)) ((or 'org-agenda-files '(function org-agenda-files))
"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)) (buffer-file-name buffers-files))
(_ (let ((print-length nil)) (_ (let ((print-length nil))
(prin1-to-string buffers-files)))))) (prin1-to-string buffers-files))))))