mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-06 15:41:27 -08:00
(start-process-shell-command): Don't use exec on windows-nt.
This commit is contained in:
parent
85cdd6afed
commit
a247bf214e
1 changed files with 9 additions and 4 deletions
13
lisp/subr.el
13
lisp/subr.el
|
|
@ -846,10 +846,15 @@ BUFFER is the buffer or (buffer-name) to associate with the process.
|
|||
Third arg is command name, the name of a shell command.
|
||||
Remaining arguments are the arguments for the command.
|
||||
Wildcards and redirection are handled as usual in the shell."
|
||||
(if (eq system-type 'vax-vms)
|
||||
(apply 'start-process name buffer args)
|
||||
(start-process name buffer shell-file-name "-c"
|
||||
(concat "exec " (mapconcat 'identity args " ")))))
|
||||
(cond
|
||||
((eq system-type 'vax-vms)
|
||||
(apply 'start-process name buffer args))
|
||||
((eq system-type 'windows-nt)
|
||||
(start-process name buffer shell-file-name shell-command-switch
|
||||
(mapconcat 'identity args " ")))
|
||||
(t
|
||||
(start-process name buffer shell-file-name shell-command-switch
|
||||
(concat "exec " (mapconcat 'identity args " "))))))
|
||||
|
||||
(defmacro save-match-data (&rest body)
|
||||
"Execute the BODY forms, restoring the global value of the match data."
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue