Mercurial > emacs

changeset 105146:2f90a275183c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-hg-outgoing, vc-hg-incoming): Ignore errors from `vc-hg-command' because hg returns status 1 when nothing is found.
author Sam Steingold <sds@gnu.org>
date Tue, 22 Sep 2009 18:43:45 +0000
parents 767b63857edd
children 4508a8827944
files lisp/ChangeLog lisp/vc-hg.el
diffstat 2 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Tue Sep 22 18:16:48 2009 +0000
+++ b/lisp/ChangeLog	Tue Sep 22 18:43:45 2009 +0000
@@ -1,6 +1,8 @@
 2009-09-22  Sam Steingold  <sds@gnu.org>
 
 	* vc-hg.el (vc-hg-print-log): Fix shortlog arg passing.
+	(vc-hg-outgoing, vc-hg-incoming): Ignore errors from
+	`vc-hg-command' because hg returns status 1 when nothing is found.
 
 2009-09-22  Stefan Monnier  <monnier@iro.umontreal.ca>
 
--- a/lisp/vc-hg.el	Tue Sep 22 18:16:48 2009 +0000
+++ b/lisp/vc-hg.el	Tue Sep 22 18:43:45 2009 +0000
@@ -570,14 +570,14 @@
 (defun vc-hg-outgoing ()
   (interactive)
   (let ((bname "*Hg outgoing*"))
-    (vc-hg-command bname 0 nil "outgoing" "-n")
+    (ignore-errors (vc-hg-command bname 0 nil "outgoing" "-n"))
     (pop-to-buffer bname)
     (vc-hg-outgoing-mode)))
 
 (defun vc-hg-incoming ()
   (interactive)
   (let ((bname "*Hg incoming*"))
-    (vc-hg-command bname 0 nil "incoming" "-n")
+    (ignore-errors (vc-hg-command bname 0 nil "incoming" "-n"))
     (pop-to-buffer bname)
     (vc-hg-incoming-mode)))