7 lines
191 B
Plaintext
7 lines
191 B
Plaintext
|
#name : traversing a directory
|
||
|
|
#contributor : Xah Lee
|
||
|
|
# --
|
||
|
|
;; apply a function to all files in a dir
|
||
|
|
(require 'find-lisp)
|
||
|
|
(mapc 'my-process-file (find-lisp-find-files "~/myweb/" "\\.html$"))
|