4 lines
182 B
Common Lisp
4 lines
182 B
Common Lisp
|
(let ((paths (list (make-pathname :directory '(:relative "docs"))
|
||
|
|
(make-pathname :directory '(:absolute "docs")))))
|
||
|
|
(mapcar #'ensure-directories-exist paths))
|