|
|
@@ -5,12 +5,14 @@
|
|
|
|
|
|
(in-package :cl-user)
|
|
|
(restas:define-module #:timeliner.web
|
|
|
- (:render-method (make-instance 'timeliner.web::renderer))
|
|
|
(:use :cl :parenscript #:timeliner.utils))
|
|
|
(in-package #:timeliner.web)
|
|
|
|
|
|
+(restas::register-pkgmodule-traits 'timeliner.web :render-method (lambda () (make-instance 'timeliner.web::renderer)))
|
|
|
+
|
|
|
(defmethod restas:initialize-module-instance :before ((module (eql #.*package*)) context)
|
|
|
(restas:with-context context
|
|
|
+ (cl-mongo:mongo :host "10.8.0.6")
|
|
|
(cl-mongo:db.use "timeline")))
|
|
|
|
|
|
(defparameter *resources*
|
