diff --git a/plugins/heroku.lisp b/plugins/heroku.lisp index dff2681..f64e48e 100644 --- a/plugins/heroku.lisp +++ b/plugins/heroku.lisp @@ -6,15 +6,17 @@ (:import-from #:hunchentoot :create-folder-dispatcher-and-handler :create-static-file-dispatcher-and-handler :*dispatch-table*) - (:import-from #:coleslaw :deploy) + (:import-from #:coleslaw :deploy + :*config*) (:export #:enable)) (in-package :coleslaw-heroku) (defmethod deploy :after (staging) - (push (create-folder-dispatcher-and-handler "/" "/app/.curr/") - *dispatch-table*) - (push (create-static-file-dispatcher-and-handler "/" "/app/.curr/index.html") - *dispatch-table*)) + (let ((blog (merge-pathnames ".curr/" (deploy *config*)))) + (push (create-folder-dispatcher-and-handler "/" blog) + *dispatch-table*) + (push (create-static-file-dispatcher-and-handler "/" (merge-pathnames "index.html" blog)) + *dispatch-table*))) (defun enable ()) diff --git a/src/packages.lisp b/src/packages.lisp index 5545186..3b3b657 100644 --- a/src/packages.lisp +++ b/src/packages.lisp @@ -7,6 +7,7 @@ #:compose) (:import-from :closure-template #:compile-template) (:export #:main + #:*config* #:blog #:content #:post