# HG changeset patch
# User james
# Date 1152205661 0
# Node ID 81975997fb1a9cb4071d363eca91b115d3c89f8f
# Parent  82ffe088ffc407e92f78e5a1f1d5ff1ab07f3d93
[xemacs-hg @ 2006-07-06 17:07:40 by james]
If an output buffer is specified, use it. <m3lkrez7pi.fsf@jerrypc.cs.usu.edu>

diff -r 82ffe088ffc4 -r 81975997fb1a lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Jul 05 21:51:14 2006 +0000
+++ b/lisp/ChangeLog	Thu Jul 06 17:07:41 2006 +0000
@@ -1,3 +1,8 @@
+2006-06-30  Jerry James  <james@xemacs.org>
+
+	* process.el (shell-command): If a specific output buffer was
+	requested, use it.
+
 2006-06-25  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* x-init.el (x-initialize-keyboard):
diff -r 82ffe088ffc4 -r 81975997fb1a lisp/process.el
--- a/lisp/process.el	Wed Jul 05 21:51:14 2006 +0000
+++ b/lisp/process.el	Thu Jul 06 17:07:41 2006 +0000
@@ -359,8 +359,8 @@
 	  ;; Command ending with ampersand means asynchronous.
 	  (progn
 	    (if-fboundp 'background
-		(background (substring command 0
-				       (match-beginning 0)))
+		(background (substring command 0 (match-beginning 0))
+			    output-buffer)
 	      (error
 	       'unimplemented
 	       "backgrounding a shell command requires package `background'")))