diff lisp/vc-git.el @ 87648:7ae99e295dfd

* vc-git.el (vc-git--call): Apply `process-file' instead of `call-process'. * net/tramp.el (tramp-remote-process-environment): Add "LC_CTYPE=C". Reported by Pete Forman <pete.forman@westerngeco.com>. (tramp-perl-encode, tramp-perl-decode): Update copyrights. (tramp-handle-process-file): Handle the case where DESTINATION is a consp with t as car. (tramp-wait-for-output): We shall remove exactly what has been find by the search.
author Michael Albinus <michael.albinus@gmx.de>
date Tue, 08 Jan 2008 20:07:21 +0000
parents 77d4b0e5e5d2
children 107ccd98fa12
line wrap: on
line diff
--- a/lisp/vc-git.el	Tue Jan 08 14:16:13 2008 +0000
+++ b/lisp/vc-git.el	Tue Jan 08 20:07:21 2008 +0000
@@ -444,7 +444,10 @@
   (apply 'vc-do-command buffer okstatus "git" file-or-list flags))
 
 (defun vc-git--call (buffer command &rest args)
-  (apply 'call-process "git" nil buffer nil command args))
+  ;; We don't need to care the arguments.  If there is a file name, it
+  ;; is always a relative one.  This works also for remote
+  ;; directories.
+  (apply 'process-file "git" nil buffer nil command args))
 
 (defun vc-git--out-ok (command &rest args)
   (zerop (apply 'vc-git--call '(t nil) command args)))