summaryrefslogtreecommitdiff
path: root/lisp/vc/vc-hg.el
diff options
context:
space:
mode:
authorAndrii Kolomoiets <andreyk.mad@gmail.com>2019-11-15 09:13:55 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2019-11-15 09:13:55 +0100
commit3db1de04527acee3a5cdd563c848582e85e0f77e (patch)
treeeb8792e4ca176906a50691182f741148f5b9a959 /lisp/vc/vc-hg.el
parent35ab18c03cf2ec5f7f1f8c511d656cd96f24d007 (diff)
downloademacs-3db1de04527acee3a5cdd563c848582e85e0f77e.tar.gz
lisp/vc/vc-hg.el: Don't pass empty string to hg update
* lisp/vc/vc-hg.el (vc-hg-retrieve-tag): Don't pass empty name to `hg update` (bug#38216).
Diffstat (limited to 'lisp/vc/vc-hg.el')
-rw-r--r--lisp/vc/vc-hg.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index 16e5dd6db00..48a7838684a 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -578,7 +578,7 @@ Optional arg REVISION is a revision to annotate from."
(defun vc-hg-retrieve-tag (dir name _update)
"Retrieve the version tagged by NAME of all registered files at or below DIR."
(let ((default-directory dir))
- (vc-hg-command nil 0 nil "update" name)
+ (vc-hg-command nil 0 nil "update" (unless (string-empty-p name) name))
;; TODO: update *vc-change-log* buffer so can see @ if --graph
))