cripslock

commit 5b991f42f24acb5f531cb2c079490ae04a40f03d
parent 172f95116a71744f4588906f813a580e6277b739
Author: Daniel Barlow <dan@telent.net>
Date:   Sun, 20 Jul 2025 21:11:22 +0100

rename method

Diffstat:
M
main.fnl
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/main.fnl b/main.fnl
@@ -203,7 +203,7 @@
                           (or (req-headers:get :user-agent)
                               "-")))))
 
-(fn reply [_ stream]
+(fn http-handler [_ stream]
   (let [req-headers (assert (stream:get_headers))
         path (req-headers:get ":path")
         method (req-headers:get ":method")
@@ -219,7 +219,7 @@
 
 (fn run []
   (let [index (index-posts "data/blogs/telent.blog/posts/")
-        myserver (server.new { :onstream reply } )]
+        myserver (server.new { :onstream http-handler } )]
     (myserver:loop)))
 
 {: run }