1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-01 05:10:54 -08:00

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

This commit is contained in:
Richard M. Stallman 1994-05-12 02:49:15 +00:00
parent 928cf89526
commit 262bb7c6e0

View 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.