diff options
| -rw-r--r-- | lisp/progmodes/project.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index 2304734bd24..2cf11afc36b 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -298,7 +298,7 @@ backend implementation of `project-external-roots'.") (defun project--vc-list-files (dir backend extra-ignores) (pcase backend (`Git - (let ((default-directory dir) + (let ((default-directory (file-name-as-directory dir)) (args '("-z"))) ;; Include unregistered. (setq args (append args '("-c" "-o" "--exclude-standard"))) @@ -317,7 +317,7 @@ backend implementation of `project-external-roots'.") (apply #'vc-git--run-command-string nil "ls-files" args) "\0" t)))) (`Hg - (let ((default-directory dir) + (let ((default-directory (file-name-as-directory dir)) args files) ;; Include unregistered. |