From: Eliza Velasquez <eliza@eliza.sh>
Date: Sat, 1 Jul 2023 00:35:44 +0000 (-0700)
Subject: Fix `async-shell-command-display-buffer' display
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cb674ab40ce8bffe566c6851cf2ac5261152f004;p=emacs.git

Fix `async-shell-command-display-buffer' display

* lisp/simple.el (shell-command): If `async-shell-command-display-buffer'
was nil, it did not respect `display-buffer-alist' entries with
`display-buffer-no-window'.  This behavior has been fixed (bug#64394).
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 321734a5026..7da2bf0fae2 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4734,7 +4734,7 @@ impose the use of a shell (with its need to quote arguments)."
                                       (when (buffer-live-p buf)
                                         (remove-function (process-filter proc)
                                                          nonce)
-                                        (display-buffer buf))))
+                                        (display-buffer buf '(nil (allow-no-window . t))))))
                                   `((name . ,nonce)))))))
 	  ;; Otherwise, command is executed synchronously.
 	  (shell-command-on-region (point) (point) command