summaryrefslogtreecommitdiffstats
path: root/emacs.d/snippets/text-mode/emacs-lisp-mode/dired.process_marked
diff options
context:
space:
mode:
Diffstat (limited to 'emacs.d/snippets/text-mode/emacs-lisp-mode/dired.process_marked')
-rw-r--r--emacs.d/snippets/text-mode/emacs-lisp-mode/dired.process_marked16
1 files changed, 16 insertions, 0 deletions
diff --git a/emacs.d/snippets/text-mode/emacs-lisp-mode/dired.process_marked b/emacs.d/snippets/text-mode/emacs-lisp-mode/dired.process_marked
new file mode 100644
index 0000000..1b42597
--- /dev/null
+++ b/emacs.d/snippets/text-mode/emacs-lisp-mode/dired.process_marked
@@ -0,0 +1,16 @@
+#name : process marked files in dired
+#contributor : Xah Lee
+# --
+;; 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