feat: pass filter query param from index handler to model

2026-06-21 09:09:14 -04:00
parent 126330c1dc
commit 8e07d0efec
1 changed files with 3 additions and 2 deletions
@@ -337,10 +337,11 @@ Set by test harnesses that only need the model functions.")
 ;; --- handlers ---------------------------------------------------------

 (defservlet index text/html (path query request)
-  (let ((books (spine-books)))
+  (let* ((books (spine-books))
+         (filter (cadr (assoc "filter" query))))
    (if books
        (insert (spine-render "index.mustache"
-                  (spine-index-model books (cadr (assoc "id" query)))))
+                  (spine-index-model books filter (cadr (assoc "id" query)))))
      (insert (spine-render-empty-state)))))

 (defun httpd/add (proc uri-path query request)