X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fprocess.el;h=690ef8017e0dafc2e1055b916ebac7c3c4684087;hp=7294e0068d6978a9229c9fc415432418e560b1c6;hb=ee38d21b330f5001b47a577cefb5ba7b82a3b7d3;hpb=79d2db7d65205bc85d471590726d0cf3af5598e0 diff --git a/lisp/process.el b/lisp/process.el index 7294e00..690ef80 100644 --- a/lisp/process.el +++ b/lisp/process.el @@ -277,7 +277,7 @@ In either case, the output is inserted after point (leaving mark after it)." (if (string-match "[ \t]*&[ \t]*$" command) ;; Command ending with ampersand means asynchronous. (progn - (background (substring command 0 (match-beginning 0)))) + (background (substring command 0 (match-beginning 0)) output-buffer)) (shell-command-on-region (point) (point) command output-buffer))))) ;; We have a sentinel to prevent insertion of a termination message