comparison lisp/subr.el @ 10025:3b058e13d177

(start-process-shell-command): Don't use `exec'-- run the command in a child process.

10024:d95a8d8ab0f4

Remaining arguments are the arguments for the command.
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 " ")))
   (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."
  (let ((original (make-symbol "match-data")))
    (list

10025:3b058e13d177

Remaining arguments are the arguments for the command.
Wildcards and redirection are handled as usual in the shell."
  (cond
   ((eq system-type 'vax-vms)
    (apply 'start-process name buffer 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
		   (mapconcat 'identity args " ")))))

(defmacro save-match-data (&rest body)
  "Execute the BODY forms, restoring the global value of the match data."
  (let ((original (make-symbol "match-data")))
    (list