(shell-command): Use buffer name *Shell-Command*.
This commit is contained in:
@@ -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.
|
||||
|
||||
Reference in New Issue
Block a user