* lisp/vc/vc-dispatcher.el (vc-do-command): Get rid of default sentinel msg.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bc409171fb2d71a3d08c0388580623a5110834ab..97ee66dcc0152e79e639d4f7a6da5b2841b6e8ef 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-04-19  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * vc/vc-dispatcher.el (vc-do-command): Get rid of default sentinel msg.
+
 2013-04-19  Fabián Ezequiel Gallina  <fgallina@gnu.org>
 
        New faster Imenu implementation (bug#14058).

diff --git a/lisp/vc/vc-dispatcher.el b/lisp/vc/vc-dispatcher.el
index b03619e03d9aabfdf713fdf9e9cf2d16674c3215..ed61adec1fe990af3e9f5e21222b0b55b076d302 100644 (file)
--- a/lisp/vc/vc-dispatcher.el
+++ b/lisp/vc/vc-dispatcher.el
@@ -329,7 +329,9 @@ case, and the process object in the asynchronous case."
                               command squeezed))))
                (when vc-command-messages
                  (message "Running %s in background..." full-command))
-               ;;(set-process-sentinel proc (lambda (p msg) (delete-process p)))
+                ;; Get rid of the default message insertion, in case we don't
+                ;; set a sentinel explicitly.
+               (set-process-sentinel proc #'ignore)
                (set-process-filter proc 'vc-process-filter)
                (setq status proc)
                (when vc-command-messages