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

diff --git a/lisp/simple.el b/lisp/simple.el
index 6b7bc51dc2f7f8691423daaa8c99f78259dfcad3..fd2e3c9fbe260d3b05e0573ebe551422954ce68b 100644 (file)
--- 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.