cripslock

commit 71b07a12dc9ee87fa1b56e2085b2776d39524cd9
parent 2907b037c49b57aca889bce9020f0d3f5950bae0
Author: Daniel Barlow <dan@telent.net>
Date:   Wed,  6 Aug 2025 22:29:12 +0100

swap param order to send-post

every other function accepts stream as first param,
so let's make this one consistent

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

1 file changed, 4 insertions(+), 7 deletions(-)
diff --git a/main.fnl b/main.fnl
@@ -161,10 +161,8 @@ href=\"https://axillae.telent.net/\">@dan@axillae.telent.net</a>
      s)
     (stream:write_chunk "</ul></aside>")))
 
-;; (define-tests :sidebar
-;;   (print (view (all-months post-index))))
 
-(fn send-post [post stream excerpt?]
+(fn send-post [stream post excerpt?]
   (let [path (. post :full-path)
         s (stream-from-cq-stream stream)]
     (print :path path)
@@ -172,7 +170,7 @@ href=\"https://axillae.telent.net/\">@dan@axillae.telent.net</a>
 
 (fn send-search-results [stream format results]
   (each [_ p (ipairs results)]
-    (send-post p stream (= format :excerpts))))
+    (send-post stream p (= format :excerpts))))
 
 (fn send-home-page [stream]
   (server.headers stream { })
@@ -230,7 +228,7 @@ href=\"https://axillae.telent.net/\">@dan@axillae.telent.net</a>
         path (. post :full-path)]
     (server.headers stream { })
     (page-header stream post.title)
-    (send-post post stream)
+    (send-post stream post)
     (sidebar post-index stream)
     (page-footer stream)
     (stream:write_chunk "" true)))
@@ -242,7 +240,7 @@ href=\"https://axillae.telent.net/\">@dan@axillae.telent.net</a>
     (server.headers stream { })
     (page-header stream (.. "Topic: " slug))
     (if post
-        (send-post post stream)
+        (send-post stream post)
         (to-html [:h1 slug] s))
 
     (to-html
@@ -267,7 +265,6 @@ href=\"https://axillae.telent.net/\">@dan@axillae.telent.net</a>
         })]
     (server.headers stream
                     { :content-type "application/rss+xml; charset=utf-8" })
-    ; (print :s stream (view posts))
     (rss.feed stream "https://ww.telent.net" post-index posts)))