cripslock

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README

commit 5726906c1c8b4e9670540b24d282adec6e1d6cb1
parent a4c465e3917f2d4c07ef4b927763cdb2f0bc37f9
Author: Daniel Barlow <dan@telent.net>
Date:   Sat,  9 Aug 2025 09:20:36 +0100

send 404 if no post for slug

Diffstat:
Mmain.fnl | 9+++++----
1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/main.fnl b/main.fnl @@ -233,9 +233,8 @@ href=\"https://axillae.telent.net/\">@dan@axillae.telent.net</a> (page-footer stream) (stream:write_chunk "" true ))) -(fn send-post-page [stream collection slug] - (let [post (collection:get slug) - path (. post :full-path)] +(fn send-post-page [stream collection post] + (let [path (. post :full-path)] (server.headers stream { }) (page-header stream post.title) (send-post stream collection post) @@ -282,7 +281,9 @@ href=\"https://axillae.telent.net/\">@dan@axillae.telent.net</a> (print (view route)) (case route [:show { : slug }] - (send-post-page stream collection slug) + (case (collection:get slug) + post (send-post-page stream collection post) + nil (server.headers stream { ":status" :404 } true)) [:rss] (send-rss stream collection) [:refresh _]