aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman1996-07-26 21:22:34 +0000
committerRichard M. Stallman1996-07-26 21:22:34 +0000
commitbcbe4d5724c5e859235fb472d6e1542a80836863 (patch)
treeb3de5ab990631d51ab7116f2026a3e89a5986a36 /lisp
parent2e716096a0a1d9d1166d3a4acc243793510a55ce (diff)
downloademacs-bcbe4d5724c5e859235fb472d6e1542a80836863.tar.gz
emacs-bcbe4d5724c5e859235fb472d6e1542a80836863.zip
(vc-do-command): Bind win32-quote-process-args.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/vc.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc.el b/lisp/vc.el
index ede3b3a4ad2..ab1519e82bb 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -420,7 +420,8 @@ to an optional list of FLAGS."
420 (cons (concat "PATH=" (getenv "PATH") 420 (cons (concat "PATH=" (getenv "PATH")
421 path-separator 421 path-separator
422 (mapconcat 'identity vc-path path-separator)) 422 (mapconcat 'identity vc-path path-separator))
423 process-environment))) 423 process-environment))
424 (win32-quote-process-args t))
424 (setq status (apply 'call-process command nil t nil squeezed))) 425 (setq status (apply 'call-process command nil t nil squeezed)))
425 (goto-char (point-max)) 426 (goto-char (point-max))
426 (set-buffer-modified-p nil) 427 (set-buffer-modified-p nil)