aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/vc-dispatcher.el3
2 files changed, 5 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5708a462add..f22eebe07fe 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12008-08-14 Michael Albinus <michael.albinus@gmx.de>
2
3 * vc-dispatcher.el (vc-do-command): Let asynchronous processes run
4 also for remote directories.
5
12008-08-14 Stefan Monnier <monnier@iro.umontreal.ca> 62008-08-14 Stefan Monnier <monnier@iro.umontreal.ca>
2 7
3 * emacs-lisp/easymenu.el (easy-menu-add): Don't precompute keybindings 8 * emacs-lisp/easymenu.el (easy-menu-add): Don't precompute keybindings
diff --git a/lisp/vc-dispatcher.el b/lisp/vc-dispatcher.el
index d4ebb398e98..ce12e4afd1c 100644
--- a/lisp/vc-dispatcher.el
+++ b/lisp/vc-dispatcher.el
@@ -324,9 +324,6 @@ that is inserted into the command line before the filename."
324 (mapconcat 'identity vc-path path-separator)) 324 (mapconcat 'identity vc-path path-separator))
325 process-environment)) 325 process-environment))
326 (w32-quote-process-args t)) 326 (w32-quote-process-args t))
327 (when (and (eq okstatus 'async) (file-remote-p default-directory))
328 ;; start-process does not support remote execution
329 (setq okstatus nil))
330 (if (eq okstatus 'async) 327 (if (eq okstatus 'async)
331 ;; Run asynchronously. 328 ;; Run asynchronously.
332 (let ((proc 329 (let ((proc