diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-11 23:46:27 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-11 23:54:46 +0200 |
| commit | 70b5cbc0bb46894e0fb4481897b4dd9b6ffcad38 (patch) | |
| tree | c26f5719c555c8818e312fcaa8005adeadd1f7e3 /module/web/http/make-routes.scm | |
| parent | Update today-button to not depend on initial content. (diff) | |
| download | calp-70b5cbc0bb46894e0fb4481897b4dd9b6ffcad38.tar.gz calp-70b5cbc0bb46894e0fb4481897b4dd9b6ffcad38.tar.xz | |
Add number of TODO's.
Diffstat (limited to 'module/web/http/make-routes.scm')
| -rw-r--r-- | module/web/http/make-routes.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/module/web/http/make-routes.scm b/module/web/http/make-routes.scm index 11f7dfb4..105bba50 100644 --- a/module/web/http/make-routes.scm +++ b/module/web/http/make-routes.scm @@ -102,6 +102,7 @@ (append ((@ (web query) parse-query) r:query) + ;; TODO what's happening here? (let ((content-type (assoc-ref r:headers 'content-type))) ((@ (hnh util) when) content-type (let ((type (car content-type)) |