[Emacs-diffs] Changes to emacs/lisp/vc.el,v

[Eric S. Raymond]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Eric S. Raymond <esr>   07/10/20 16:32:50

Index: vc.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/vc.el,v
retrieving revision 1.473
retrieving revision 1.474
diff -u -b -r1.473 -r1.474
--- vc.el       19 Oct 2007 20:59:49 -0000      1.473
+++ vc.el       20 Oct 2007 16:32:50 -0000      1.474
@@ -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