summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tissue/web/dev.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/tissue/web/dev.scm b/tissue/web/dev.scm
index 0140e0f..5ca7d16 100644
--- a/tissue/web/dev.scm
+++ b/tissue/web/dev.scm
@@ -36,6 +36,10 @@
"Handle web @var{request} with @var{body} and return two values---the
response headers and body. See @code{start-dev-web-server} for
documentation of @var{xapian-index} and @var{project-thunk}."
+ ;; The project configuration could have changed between requests and
+ ;; we want to read the latest configuration on each request. So, we
+ ;; require a thunk that loads the project configuration, rather than
+ ;; the project configuration itself.
(let ((project (project-thunk))
(path (uri-path (request-uri request))))
(log-request request)