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

diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 8b4d8ab748e7c84ca3db571678dd4b196858ab6f..4b41ef1ca404dd13bf7646e4aed23905795623a7 100644 (file)
--- 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)))))