2024-10-05 22:05:26 +09:00
|
|
|
(defpackage #:hp/app
|
2024-02-02 01:07:19 +09:00
|
|
|
(:use #:cl)
|
2024-02-13 20:34:31 +09:00
|
|
|
(:local-nicknames (#:jg #:jingle))
|
2024-02-14 01:18:20 +09:00
|
|
|
(:local-nicknames (#:fbr #:ningle-fbr))
|
2024-06-15 17:28:29 +09:00
|
|
|
(:local-nicknames (#:env #:hp/env))
|
2024-12-20 15:25:14 +09:00
|
|
|
(:import-from #:hp/middlewares/recoverer
|
|
|
|
#:*recoverer*)
|
|
|
|
(:import-from #:hp/middlewares/trailing-slash
|
|
|
|
#:*trim-trailing-slash*)
|
|
|
|
(:import-from #:hp/middlewares/public-server
|
|
|
|
#:*public-server*)
|
2024-10-03 14:48:42 +09:00
|
|
|
(:import-from #:hp/renderer)
|
2024-10-05 22:05:26 +09:00
|
|
|
(:export #:*app*))
|
|
|
|
(in-package #:hp/app)
|
2024-06-16 14:13:16 +09:00
|
|
|
|
2024-11-16 20:37:45 +09:00
|
|
|
(defparameter *app* (jg:make-app :address env:*address*
|
2024-06-15 17:28:29 +09:00
|
|
|
:port env:*port*))
|
2024-02-14 00:15:37 +09:00
|
|
|
|
2024-12-20 15:25:14 +09:00
|
|
|
(fbr:set-routes *app* :system :hp :target-dir-path "routes")
|
|
|
|
(jg:install-middleware *app* *recoverer*)
|
|
|
|
(jg:install-middleware *app* *trim-trailing-slash*)
|
|
|
|
(jg:install-middleware *app* *public-server*)
|
2025-03-28 23:12:07 +09:00
|
|
|
|
|
|
|
(jg:configure *app*)
|