17 lines
480 B
Plaintext
17 lines
480 B
Plaintext
|
#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
|