+
−# contributor: Xah Lee (XahLee.org)
+
−# name: process marked files in dired
+
−# key: x-dired
+
−# --
+
−;; idiom for processing a list of files in dired's marked files
+
−
+
−;; suppose myProcessFile is your function that takes a file path
+
−;; and do some processing on the file
+
−
+
−(defun dired-myProcessFile ()
+
−  "apply myProcessFile function to marked files in dired."
+
−  (interactive)
+
−  (require 'dired)
+
−  (mapc 'myProcessFile (dired-get-marked-files))
+
−)
+
−
+
−;; to use it, type M-x dired-myProcessFile