1 ;;; core/lisp skel system 4 ;; :components ((:org "babel")) 5 :bind ((dotemacs (merge-pathnames ".emacs.d/" (user-homedir-pathname)))
6 (config () (directory "emacs/*.el"))
7 (lib () (directory "emacs/lib/*.el")))
13 ((in el :direction :input)
14 (out (merge-pathnames (file-namestring el) dotemacs) :direction :output))
15 (std:copy-stream in out :finish-output t)))
20 ((in el :direction :input)
21 (out (merge-pathnames (file-namestring el)
22 (ensure-directories-exist
23 (merge-pathnames "lib/" dotemacs)))
25 (std:copy-stream in out :finish-output t)))