Commit c3de9feb authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen
Browse files

(dired-guess-default): Remove duplicate shell command entries.

Fixes: debbugs:2028
parent dcc88d8a
2011-07-11 Lars Magne Ingebrigtsen <larsi@gnus.org>
* dired-x.el (dired-guess-default): Remove duplicate shell command
entries (bug#2028).
* subr.el (remove-duplicates): New conveniency function.
2011-07-10 Lars Magne Ingebrigtsen <larsi@gnus.org>
......
......@@ -1103,9 +1103,10 @@ 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.
(if (cdr cmds)
(mapcar #'eval cmds)
(eval (car cmds))))) ; single command
(remove-duplicates
(if (cdr cmds)
(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."
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment