diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index c4e9c060257..446f0c63d1e 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -1837,7 +1837,7 @@ Cannot relocate first working tree because this would break other working trees"
 Always has to fetch, like `vc-hg-incoming-revision' does."
   (with-temp-buffer
     (vc-hg-command t 0 nil "log" (format "--rev=outgoing() and %s" rev))
-    (<= (point-max) 1)))
+    (bobp)))
 
 (provide 'vc-hg)