From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 15 Nov 2019 09:04:23 +0000 (+0100)
Subject: Avoid using subr-x function
X-Git-Tag: emacs-27.0.90~611
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3495cefcf67e508152097a53e6505f214e46fa9e;p=emacs.git

Avoid using subr-x function

* lisp/vc/vc-hg.el (vc-hg-retrieve-tag): Avoid using subr-x
function (bug#38216).
---

diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index 48a7838684a..6ecf9fb41d7 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -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
     ))