[h-e-w] Re: Customizing run-shell-command

[Mathias Dahl]

Henrik Andersson <address@hidden> writes:

> How can I change run-shell-command (X in Dired) to run
> acrord32 instead of xpdf on .pdf for instance or even
> better the program which is associated with the extension
> in windows?

I use this:

(defun dired-w32-open-files (&optional arg files)
  "*Open FILES using the applications registered to handle them.
Return an error message if there is no application registered to
handle the files.  This command simply calls `w32-shell-execute'
and only works on Window systems."
  (interactive (list current-prefix-arg (dired-get-marked-files nil 
current-prefix-arg)))
  (unless (fboundp 'w32-shell-execute)
    (error "This command is not available on this system."))
  (mapc (lambda (fn)
          (w32-shell-execute "Open" (subst-char-in-string ?/ ?\\ 
(expand-file-name fn))))
        files))

Map it to some easy to use key.

/Mathias