From a7c4e36f093b2bedf3180197b9a6139faa4e4673 Mon Sep 17 00:00:00 2001
From: cage <cage@invalid>
Date: Thu, 3 Aug 2023 15:18:16 +0200
Subject: [PATCH] - initialized the parser in the script to generate gemlog.

---
 data/scripts/generate-gemlog.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/data/scripts/generate-gemlog.lisp b/data/scripts/generate-gemlog.lisp
index ba3f5a5..7e938ca 100644
--- a/data/scripts/generate-gemlog.lisp
+++ b/data/scripts/generate-gemlog.lisp
@@ -134,7 +134,8 @@
                                              (fs:collect-children capsule-bulk-dir)))
          (parsed-posts        (mapcar (lambda (a)
                                         (handler-case
-                                            (parse-gemini-file (fs:slurp-file a))
+                                            (with-initialized-parser
+                                              (parse-gemini-file (fs:slurp-file a)))
                                           (error (e)
                                             (notify
                                                     "Unable to parse ~a: ~a~%"