From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sat, 30 Jan 2021 07:59:48 +0000 (+0100)
Subject: Fix vc-hg-rename-file on file names like ~/foo/bar
X-Git-Tag: emacs-28.0.90~4030
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=32dc433dbb83a5c38650769dc064c082bf79ee8c;p=emacs.git

Fix vc-hg-rename-file on file names like ~/foo/bar

* lisp/vc/vc-hg.el (vc-hg-rename-file): Use absolute file names,
because hg doesn't like getting file names like "~/foo/bar"
(bug#36932).
---

diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index c4b82ab11eb..1d163a64ab2 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -1166,7 +1166,8 @@ hg binary."
 ;; Modeled after the similar function in vc-bzr.el
 (defun vc-hg-rename-file (old new)
   "Rename file from OLD to NEW using `hg mv'."
-  (vc-hg-command nil 0 new "mv" old))
+  (vc-hg-command nil 0 (expand-file-name new) "mv"
+                 (expand-file-name old)))
 
 (defun vc-hg-register (files &optional _comment)
   "Register FILES under hg. COMMENT is ignored."