]> code.delx.au - gnu-emacs-elpa/blobdiff - packages/yasnippet/snippets/emacs-lisp-mode/x-traverse_dir.yasnippet
Add yasnippet.
[gnu-emacs-elpa] / packages / yasnippet / snippets / emacs-lisp-mode / x-traverse_dir.yasnippet
diff --git a/packages/yasnippet/snippets/emacs-lisp-mode/x-traverse_dir.yasnippet b/packages/yasnippet/snippets/emacs-lisp-mode/x-traverse_dir.yasnippet
new file mode 100644 (file)
index 0000000..df0261d
--- /dev/null
@@ -0,0 +1,7 @@
+# name: traversing a directory
+# contributor: Xah Lee (XahLee.org)
+# key: x-traverse_dir
+# --
+;; apply a function to all files in a dir
+(require 'find-lisp)
+(mapc 'my-process-file (find-lisp-find-files "~/myweb/" "\\.html$"))
\ No newline at end of file