Re: dired question

[Stefan Monnier <monnier@iro.umontreal.ca>]

>       (setq srd-mark-list
>             (adjoin (dired-get-filename)
>                     srd-mark-list
>                     :test #'equal))))

Aka (add-to-list 'srd-mark-list (dired-get-filename))

> (defun srd-do-shell-command (command)
>   (interactive "scommand: ")
>   (dired-do-shell-command command
>                           nil
>                           (reverse srd-mark-list)))

I suspect this will break in cases where you do:
- mark A, B, C
- C-k on B
- !

because B will not be among the marked files any more but will still be in
srd-mark-list.


        Stefan