From: Philip Kaludercic <philipk@posteo.net>
Date: Fri, 22 Sep 2023 10:48:32 +0000 (+0200)
Subject: File-expand DIRECTORY argument to vc-clone
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d1d444c2b789a90da584227ae314f29d79131848;p=emacs.git

File-expand DIRECTORY argument to vc-clone

* lisp/vc/vc.el (vc-clone): Expand directory to avoid issues when
invoking the subprocess.  (Bug#66115)
---

diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 2f4b028bb4a..7f334397a5e 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -3676,8 +3676,7 @@ If successful, returns the string with the directory of the
 checkout.  If BACKEND is nil, iterate through every known backend
 in `vc-handled-backends' until one succeeds.  If REV is non-nil,
 it indicates a specific revision to check out."
-  (unless directory
-    (setq directory default-directory))
+  (setq directory (expand-file-name (or directory default-directory)))
   (if backend
       (progn
         (unless (memq backend vc-handled-backends)