File: x-traverse_dir

package info (click to toggle)
yasnippet-snippets 0.23-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 8,904 kB
  • sloc: lisp: 118; sh: 13; ada: 5; makefile: 2
file content (8 lines) | stat: -rw-r--r-- 249 bytes parent folder | download 
1
2
3
4
5
6
7
8
 
# -*- 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$"))