Fix wrong-number-of-args on 'doom install'

Only affects Emacs 26.x users, because `file-name-quote`s signature
changed in 27.1.
This commit is contained in:
Henrik Lissner 2020-11-02 17:00:13 -05:00
parent 74737dad37
commit 65be6923e7
No known key found for this signature in database
GPG Key ID: 5F6C0EA160557395

View File

@ -689,7 +689,9 @@ REMOTE is non-nil, search on the remote host indicated by
(when (stringp res) (file-local-name res))) (when (stringp res) (file-local-name res)))
;; Use 1 rather than file-executable-p to better match the ;; Use 1 rather than file-executable-p to better match the
;; behavior of call-process. ;; behavior of call-process.
(let ((default-directory (file-name-quote default-directory 'top))) (let ((default-directory
(let (file-name-handler-alist)
(file-name-quote default-directory))))
(locate-file command exec-path exec-suffixes 1))))) (locate-file command exec-path exec-suffixes 1)))))
(provide 'core-lib) (provide 'core-lib)