Mercurial > emacs
comparison lisp/vc.el @ 90114:e4694597cbf4
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-21
Merge from emacs--cvs-trunk--0
Patches applied:
* miles@gnu.org--gnu-2005/emacs--cvs-trunk--0 (patch 129-149)
- Update from CVS
- Merge from gnus--rel--5.10
- (make-text-button): Default button type if not specified
- quick-install-emacs: Use mkdir --verbose only when requested
* miles@gnu.org--gnu-2005/gnus--rel--5.10 (patch 31-33)
- Merge from emacs--cvs-trunk--0
- Update from CVS
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 03 Mar 2005 10:35:22 +0000 |
parents | 3ebd9bdb4fe5 68f16372ee5a |
children | 4da4a09e8b1b |
comparison
equal
deleted
inserted
replaced
90113:a50413a4ba8b | 90114:e4694597cbf4 |
---|---|
956 (cons (concat "PATH=" (getenv "PATH") | 956 (cons (concat "PATH=" (getenv "PATH") |
957 path-separator | 957 path-separator |
958 (mapconcat 'identity vc-path path-separator)) | 958 (mapconcat 'identity vc-path path-separator)) |
959 process-environment)) | 959 process-environment)) |
960 (w32-quote-process-args t)) | 960 (w32-quote-process-args t)) |
961 (if (and (eq okstatus 'async) (file-remote-p default-directory)) | |
962 ;; start-process does not support remote execution | |
963 (setq okstatus nil)) | |
961 (if (eq okstatus 'async) | 964 (if (eq okstatus 'async) |
962 (let ((proc (apply 'start-process command (current-buffer) command | 965 (let ((proc (apply 'start-process command (current-buffer) command |
963 squeezed))) | 966 squeezed))) |
964 (unless (active-minibuffer-window) | 967 (unless (active-minibuffer-window) |
965 (message "Running %s in the background..." command)) | 968 (message "Running %s in the background..." command)) |