emacs-29 b96dc472bcb: Ignore current-prefix-arg in async-shell-command

[Eli Zaretskii]

branch: emacs-29
commit b96dc472bcba9a484d8151cec61752464f599ad2
Author: Gabriel do Nascimento Ribeiro <gabriel376@hotmail.com>
Commit: Eli Zaretskii <eliz@gnu.org>

    Ignore current-prefix-arg in async-shell-command
    
    * lisp/simple.el (async-shell-command): Ignore current-prefix-arg and
    always pass nil to second argument of `shell-command'.  (Bug#63432)
---
 lisp/simple.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index 959e28c7b75..c3d0726f91b 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4490,7 +4490,7 @@ a shell (with its need to quote arguments)."
                                ((eq major-mode 'dired-mode)
                                 (dired-get-filename nil t)))))
                          (and filename (file-relative-name filename))))
-    current-prefix-arg
+    nil
     shell-command-default-error-buffer))
   (unless (string-match "&[ \t]*\\'" command)
     (setq command (concat command " &")))