marcuskammer/coleslaw
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Switch back to having a default for COMPILE-THEME.

Browse source
This commit is contained in:
Brit Butler 2012-08-29 11:29:45 -04:00
parent e23fc10551
commit 5e4f21d2ff
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/coleslaw.lisp
View file

@ -62,6 +62,6 @@ If RAW is non-nil, write the content without wrapping it in the base template."
(defun main ()
"Load the user's config, then compile and deploy the blog."
(load-config)
(compile-theme (app-path "themes/~a/" (theme *config*)))
(compile-theme)
(compile-blog (staging *config*))
(deploy (staging *config*)))

2
src/themes.lisp
View file

@ -16,7 +16,7 @@
"Find the symbol NAME inside the current theme's package."
(find-symbol name (theme-package)))
(defun compile-theme (theme-dir)
(defun compile-theme (&key (theme-dir (app-path "themes/~a/" (theme *config*))))
"Iterate over the files in THEME-DIR, compiling them when they are templates."
(do-files (file theme-dir "tmpl")
(compile-template :common-lisp-backend file)))