procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Backport: Fix bug 39218

Browse source 
* lisp/simple.el (shell-command):
Ensure a shell command ending with `&' is run asynchronously.
This commit is contained in:
Tino Calancha 2020-01-23 10:56:02 +01:00
parent d15f2d4cbc
commit e1deafd39d
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/simple.el
View file

@ -3640,10 +3640,11 @@ impose the use of a shell (with its need to quote arguments)."
(if handler
(funcall handler 'shell-command command output-buffer error-buffer)
(if (and output-buffer
(not (string-match "[ \t]*&[ \t]*\\'" command))
(or (eq output-buffer (current-buffer))
(and (stringp output-buffer) (eq (get-buffer output-buffer) (current-buffer)))
(not (or (bufferp output-buffer) (stringp output-buffer))))) ; Bug#39067
;; Output goes in current buffer.
;; Synchronous command with output in current buffer.
(let ((error-file
(and error-buffer
(make-temp-file