From 30c091d3f5a371611062bb84b40f430b0a941a1a Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 12 Oct 2019 00:21:23 -0400 Subject: [PATCH] Fix non-string args to file-exists-p! macro --- core/autoload/files.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/core/autoload/files.el b/core/autoload/files.el index 58f86be97..fbdae80a2 100644 --- a/core/autoload/files.el +++ b/core/autoload/files.el @@ -33,7 +33,8 @@ This is used by `file-exists-p!' and `project-file-exists-p!'." (let ((filevar (make-symbol "file"))) `(let* ((file-name-handler-alist nil) (,filevar ,spec)) - (and ,(if directory + (and (stringp ,filevar) + ,(if directory `(let ((default-directory ,directory)) (,exists-fn ,filevar)) (list exists-fn filevar))