From: Karl Heuer <kwzh@gnu.org>
Date: Sat, 27 May 1995 00:36:04 +0000 (+0000)
Subject: (vc-log-info): Use path-separator.
X-Git-Tag: emacs-19.34~3900
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b525816e487ebaef8df8f6936014fc941ce7e067;p=emacs.git

(vc-log-info): Use path-separator.
---

diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 8b4d8ab748e..4b41ef1ca40 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -237,7 +237,8 @@ value of this flag.")
 	      ;; Add vc-path to PATH for the execution of this command.
 	      (process-environment
 	       (cons (concat "PATH=" (getenv "PATH")
-			     ":" (mapconcat 'identity vc-path ":"))
+			     path-separator
+			     (mapconcat 'identity vc-path path-separator))
 		     process-environment)))
 	  (apply 'call-process command nil "*vc*" nil 
 		 (append flags (list (file-name-nondirectory file)))))