# -*- mode: snippet -*-
# 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$"))