emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix non-string args to file-exists-p! macro

Browse source
This commit is contained in:
Henrik Lissner 2019-10-12 00:21:23 -04:00
parent 1d072a6c9e
commit 30c091d3f5
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
core/autoload/files.el
View file

@ -33,7 +33,8 @@ This is used by `file-exists-p!' and `project-file-exists-p!'."
(let ((filevar (make-symbol "file"))) (let ((filevar (make-symbol "file")))
`(let* ((file-name-handler-alist nil) `(let* ((file-name-handler-alist nil)
(,filevar ,spec)) (,filevar ,spec))
(and ,(if directory (and (stringp ,filevar)
,(if directory
`(let ((default-directory ,directory)) `(let ((default-directory ,directory))
(,exists-fn ,filevar)) (,exists-fn ,filevar))
(list exists-fn filevar)) (list exists-fn filevar))