Mercurial > emacs

changeset 85490:5f331ce2c3b0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Condition out a misleading message.
author Eric S. Raymond <esr@snark.thyrsus.com>
date Sat, 20 Oct 2007 16:32:50 +0000
parents 8614e9eb8411
children 4e4495d0039c
files lisp/vc.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Sat Oct 20 15:51:12 2007 +0000
+++ b/lisp/vc.el	Sat Oct 20 16:32:50 2007 +0000
@@ -1070,8 +1070,9 @@
 	      (shrink-window-if-larger-than-buffer)
 	      (error "Running %s...FAILED (%s)" full-command
 		     (if (integerp status) (format "status %d" status) status))))
-	  ;; We're done
-	  (if vc-command-messages
+	  ;; We're done.  But don't emit a status message if running
+	  ;; asychronously, it would just mislead.
+	  (if (and vc-command-messages (not (eq okstatus 'async)))
 	      (message "Running %s...OK = %d" full-command status)))
 	(vc-exec-after
 	 `(run-hook-with-args 'vc-post-command-functions