|
@@ -0,0 +1,17 @@
|
|
1
|
+(defpackage :coleslaw-heroku
|
|
2
|
+ (:use :cl)
|
|
3
|
+ (:import-from #:hunchentoot :create-folder-dispatcher-and-handler
|
|
4
|
+ :create-static-file-dispatcher-and-handler
|
|
5
|
+ :*dispatch-table*)
|
|
6
|
+ (:import-from #:coleslaw :deploy)
|
|
7
|
+ (:export #:enable))
|
|
8
|
+
|
|
9
|
+(in-package :coleslaw-heroku)
|
|
10
|
+
|
|
11
|
+(defmethod deploy :after (staging)
|
|
12
|
+ (push (create-folder-dispatcher-and-handler "/" "/app/.curr/")
|
|
13
|
+ *dispatch-table*)
|
|
14
|
+ (push (create-static-file-dispatcher-and-handler "/" "/app/.curr/index.html")
|
|
15
|
+ *dispatch-table*))
|
|
16
|
+
|
|
17
|
+(defun enable ())
|