Plaster
New
List
Login
common-lisp
default
anonymous
2023.11.21 12:25:58
(defun update-md-files (update-function) (modify-md-files-in-dir *md-dir* (lambda (filepath) (str:to-file filepath (update-function (load-file filepath)))))) (defun update-md-files (update-function) (modify-md-files-in-dir *md-dir* (lambda (filepath) (str:to-file filepath (funcall #'update-function (load-file filepath))))))
Raw
Annotate
Repaste
Edit