]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/vc/vc-bzr.el (vc-bzr-after-dir-status):
authorGlenn Morris <rgm@gnu.org>
Tue, 28 Apr 2015 05:15:12 +0000 (22:15 -0700)
committerGlenn Morris <rgm@gnu.org>
Tue, 28 Apr 2015 05:15:12 +0000 (22:15 -0700)
Don't get confused by a bzrlib version mismatch warning.

lisp/vc/vc-bzr.el

index 811f9e80b0c9f3d47860d1709cb8026dea399c90..9c52106fdb503cc1f1f2c3ddddc3fb3d6419b4cb 100644 (file)
@@ -954,6 +954,12 @@ stream.  Standard error output is discarded."
        (translated nil)
        (result nil))
       (goto-char (point-min))
+      ;; Skip a warning message that can occur in some bzr installations.
+      ;; vc-bzr-dir-extra-headers already reports it.
+      ;; Perhaps we should just discard stderr?
+      (and (looking-at "bzr: WARNING: bzrlib version doesn't match")
+           (re-search-forward "^bzr is version" nil t)
+           (forward-line 1))
       (while (not (eobp))
         ;; Bzr 2.3.0 added this if there are shelves.  (Bug#8170)
         (unless (looking-at "[0-9]+ shel\\(f\\|ves\\) exists?\\.")