Avoid using subr-x function

* lisp/vc/vc-hg.el (vc-hg-retrieve-tag): Avoid using subr-x
function (bug#38216).
This commit is contained in:
Lars Ingebrigtsen 2019-11-15 10:04:23 +01:00
parent fb3dea96b7
commit 3495cefcf6

View file

@ -578,7 +578,8 @@ 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" (unless (string-empty-p name) name))
(vc-hg-command nil 0 nil "update" (and (not (equal name ""))
name))
;; TODO: update *vc-change-log* buffer so can see @ if --graph
))