# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 840247831 0
# Node ID d814bc72503fa55bbf186b0b8dd72cd5bf88bddd
# Parent  5ffb83189a1b29231200abad2768f0558453f9ad
(shell-command): Really use output-buffer in synchronous
case, when it is a buffer.

diff -r 5ffb83189a1b -r d814bc72503f lisp/simple.el
--- a/lisp/simple.el	Fri Aug 16 23:14:09 1996 +0000
+++ b/lisp/simple.el	Sat Aug 17 02:10:31 1996 +0000
@@ -828,7 +828,7 @@
 		  (require 'shell) (shell-mode)
 		  (set-process-sentinel proc 'shell-command-sentinel)
 		  ))
-	    (shell-command-on-region (point) (point) command nil)
+	    (shell-command-on-region (point) (point) command output-buffer)
 	    ))))))
 
 ;; We have a sentinel to prevent insertion of a termination message