mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

(start-process-shell-command): Don't use `exec'--

Browse source 
run the command in a child process.
This commit is contained in:
Richard M. Stallman 1994-11-19 14:06:09 +00:00
parent cc66b32b04
commit b59f6d7a68
1 changed files with 3 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/subr.el
View file

@ -853,12 +853,11 @@ Wildcards and redirection are handled as usual in the shell."
(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 " ")))
;; We used to use `exec' to replace the shell with the command,
;; but that failed to handle (...) and semicolon, etc.
(t
(start-process name buffer shell-file-name shell-command-switch
(concat "exec " (mapconcat 'identity args " "))))))
(mapconcat 'identity args " ")))))
(defmacro save-match-data (&rest body)
"Execute the BODY forms, restoring the global value of the match data."