emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master bbe6c68d79: Re-fix previous `&' dired change


From: Lars Ingebrigtsen
Subject: master bbe6c68d79: Re-fix previous `&' dired change
Date: Fri, 20 May 2022 04:37:30 -0400 (EDT)

branch: master
commit bbe6c68d79ae422498048f06fd8f1641abb38eab
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Re-fix previous `&' dired change
    
    * lisp/dired-aux.el (dired-shell-stuff-it): Re-fix the previous
    change -- the &wait was in the wrong place (bug#36331).
---
 lisp/dired-aux.el | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index a98425d129..d87d617ed7 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -998,13 +998,14 @@ Also see the `dired-confirm-shell-command' variable."
                                file-list dired-mark-separator)))
          (when (cdr file-list)
            (setq files (concat dired-mark-prefix files dired-mark-postfix)))
-         (funcall stuff-it files))))
-     (or (and in-background
-              (if (not w32-shell)
-                  ;; Work the same as the `on-each' case -- don't
-                  ;; accept user input in the output buffer.
-                  "&wait"
-                "&"))
+         (concat
+          (funcall stuff-it files)
+          ;; Be consistent in how we treat inputs to commands -- do
+          ;; the same here as in the `on-each' case.
+          (if (and in-background (not w32-shell))
+              "&wait"
+            "")))))
+     (or (and in-background "&")
          ""))))
 
 ;; This is an extra function so that it can be redefined by ange-ftp.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]