summaryrefslogtreecommitdiff
path: root/tissue
diff options
context:
space:
mode:
authorArun Isaac2023-01-29 21:44:54 +0000
committerArun Isaac2023-01-29 22:35:53 +0000
commitb1f7b54fece789a2abcda356c7c2bca23a7100f1 (patch)
tree75f70c88c9b120cf3cbb733c6654514192b43bb3 /tissue
parentfb26896560dbdfa80eb517d157e9afd2562e1f8e (diff)
downloadtissue-b1f7b54fece789a2abcda356c7c2bca23a7100f1.tar.gz
tissue-b1f7b54fece789a2abcda356c7c2bca23a7100f1.tar.lz
tissue-b1f7b54fece789a2abcda356c7c2bca23a7100f1.zip
web: Explain why we pass a project thunk to the dev server.
* tissue/web/dev.scm (handler): Explain why we pass in a project thunk.
Diffstat (limited to 'tissue')
-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)