From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 12 May 1994 02:49:15 +0000 (+0000)
Subject: (shell-command): Use buffer name *Shell-Command*.
X-Git-Tag: emacs-19.34~8390
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=262bb7c6e048bf75970af115ba5927cd67febcd7;p=emacs.git

(shell-command): Use buffer name *Shell-Command*.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 6b7bc51dc2f..fd2e3c9fbe2 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -682,7 +682,7 @@ This cannot be done asynchronously."
       (unwind-protect
 	  (if (string-match "[ \t]*&[ \t]*$" command)
 	      ;; Command ending with ampersand means asynchronous.
-	      (let ((buffer (get-buffer-create "*shell-command*")) 
+	      (let ((buffer (get-buffer-create "*Shell-Command*")) 
 		    (directory default-directory)
 		    proc)
 		;; Remove the ampersand.