diff --git a/lisp/dired-x.el b/lisp/dired-x.el index 580217d3fbd..d6eff9f129f 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -1103,10 +1103,9 @@ See `dired-guess-shell-alist-user'." ;; Return commands or nil if flist is still non-nil. ;; Evaluate the commands in order that any logical testing will be done. - (remove-duplicates - (if (cdr cmds) - (mapcar #'eval cmds) - (eval (car cmds)))))) ; single command + (if (cdr cmds) + (remove-duplicates (mapcar #'eval cmds)) + (eval (car cmds))))) ; single command (defun dired-guess-shell-command (prompt files) "Ask user with PROMPT for a shell command, guessing a default from FILES."