diff options
| -rw-r--r-- | tissue/web/dev.scm | 4 |
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) |