From 88c78f464129856da0c980bc808f8fdeafae8e1c Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Sun, 29 Jul 2018 14:27:36 +0200
Subject: Load site.lisp at runtime.

Loading site.lisp on startup rather than at compile-time is necessary
to make the Docker/Kubernetes use case work.
---
 mulkcms-hunchentoot.lisp | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'mulkcms-hunchentoot.lisp')

diff --git a/mulkcms-hunchentoot.lisp b/mulkcms-hunchentoot.lisp
index 4d7f3c1..f26ea7e 100644
--- a/mulkcms-hunchentoot.lisp
+++ b/mulkcms-hunchentoot.lisp
@@ -79,6 +79,10 @@
   *acceptor*)
 
 (defun run-server ()
+  (format t "~&Loading site configuration.")
+  (load "site.lisp")
+  (format t "~&Starting site: ~A" mulkcms::*site-name*)
+  (terpri)
   (let ((acceptor (start-server)))
     (unwind-protect
          (loop
-- 
cgit v1.2.3