From 703e9e93087d32364087a0ebc9e315869b70ff7c Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Sat, 15 Jun 2024 21:17:03 -0500
Subject: Update things

---
 lib/html.scm | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'lib/html.scm')

diff --git a/lib/html.scm b/lib/html.scm
index 07cd921..26cdff4 100644
--- a/lib/html.scm
+++ b/lib/html.scm
@@ -3,7 +3,10 @@
 (import scheme (chicken base)
         (chicken irregex)
         (jimmy emit)
-        (jimmy util))
+        (jimmy util)
+        utf8-srfi-13)
+
+(output-type 'html)
 
 (define (escape-entities s)
   (irregex-replace/all "[&<>]" s
@@ -24,7 +27,7 @@
       (char->tag "_" "i")
       (char->tag "`" "code")) s))
 
-(formats
+(set-formats!
   '((para (line . "~a~%")
           (stanza . "<p>~% ~a</p>~%"))
     (verb (line . "~a~%")
@@ -43,7 +46,7 @@
     (hdr3 (line . "~a")
           (stanza . "<h3>~a</h3>~%"))))
 
-(filters
+(set-filters!
   `((verb (line . ,identity)
           (stanza . ,join-lines))
     (link (line . ,(lambda (ln)
-- 
cgit 1.4.1-21-gabe81