Mercurial > hg > xemacs-beta

comparison lisp/process.el @ 333:4f79e16b1112 r21-0-64

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0-64
author cvs
date Mon, 13 Aug 2007 10:49:50 +0200
parents 19dcec799385
children cc15677e0335
comparison
equal deleted inserted replaced
332:bb75ebac9531 333:4f79e16b1112
348 (defun exec-to-string (command) 348 (defun exec-to-string (command)
349 "Execute COMMAND as an external process and return the output of that 349 "Execute COMMAND as an external process and return the output of that
350 process as a string" 350 process as a string"
351 ;; by "William G. Dubuque" <wgd@zurich.ai.mit.edu> 351 ;; by "William G. Dubuque" <wgd@zurich.ai.mit.edu>
352 (with-output-to-string 352 (with-output-to-string
353 (call-process shell-file-name nil t nil "-c" command))) 353 (call-process shell-file-name nil t nil shell-command-switch command)))
354 354
355 (defalias 'shell-command-to-string 'exec-to-string) 355 (defalias 'shell-command-to-string 'exec-to-string)
356 356
357 ;;; process.el ends here 357 ;;; process.el ends here