Mercurial > hg > xemacs-beta
changeset 1189:23eaac87b4b0
[xemacs-hg @ 2003-01-05 18:38:36 by daiki]
2002-12-17 Daiki Ueno <daiki@xemacs.org>
* process.el (shell-command-to-string): Synch with GNU Emacs 21.
| author | daiki |
|---|---|
| date | Sun, 05 Jan 2003 18:38:37 +0000 |
| parents | 11ff4edb6bb7 |
| children | cad420869d19 |
| files | lisp/ChangeLog lisp/process.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Jan 05 10:54:04 2003 +0000 +++ b/lisp/ChangeLog Sun Jan 05 18:38:37 2003 +0000 @@ -7,6 +7,10 @@ * wid-edit.el: Synch trivia to GNU Emacs 21.3.50. Make docstrings from comments, fix typos & whitespace, add some comments and fixmes. +2002-12-17 Daiki Ueno <daiki@xemacs.org> + + * process.el (shell-command-to-string): Synch with GNU Emacs 21. + 2002-12-15 Ben Wing <ben@xemacs.org> * ChangeLog: Combine all ChangeLog files.
--- a/lisp/process.el Sun Jan 05 10:54:04 2003 +0000 +++ b/lisp/process.el Sun Jan 05 18:38:37 2003 +0000 @@ -512,7 +512,8 @@ (defun shell-command-to-string (command) "Execute shell command COMMAND and return its output as a string." (with-output-to-string - (call-process shell-file-name nil t nil shell-command-switch command))) + (with-current-buffer standard-output + (call-process shell-file-name nil t nil shell-command-switch command)))) (defalias 'exec-to-string 'shell-command-to-string)