(shell-command): Use buffer name *Shell-Command*.
authorRichard M. Stallman <rms@gnu.org>
Thu, 12 May 1994 02:49:15 +0000 (02:49 +0000)
committerRichard M. Stallman <rms@gnu.org>
Thu, 12 May 1994 02:49:15 +0000 (02:49 +0000)
lisp/simple.el

index 6b7bc51..fd2e3c9 100644 (file)
@@ -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.