mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(vc-do-command): Search vc-path first, not last.

Browse Source
This commit is contained in:
Richard M. Stallman 1995-03-01 08:30:54 +00:00
parent 4c52b66830
commit 46cd263f61
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/vc.el
View File

@ -261,7 +261,7 @@ the master name of FILE if LAST is 'MASTER, or the workfile of FILE if LAST is
(if (string= (substring file 0 preflen) pwd)
(setq file (substring file preflen))))
(setq squeezed (append squeezed (list file)))))
(let ((exec-path (if vc-path (append exec-path vc-path) exec-path))
(let ((exec-path (append vc-path exec-path))
;; Add vc-path to PATH for the execution of this command.
(process-environment
(cons (concat "PATH=" (getenv "PATH")