rssmix - Fix

shirok · Nov 5, 2023 · 6554c1b · 6554c1b
1 parent 6f07d8e
commit 6554c1b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/wiliki/rssmix.scm b/src/wiliki/rssmix.scm
@@ -117,7 +117,7 @@
   (define  (db-mget ids)
     (with-db (db :read) (map (cut db-get1 db <>) ids)))
   (define (db-put! id record)
-    (with-db (db :write) (dbm-put! db id record)))
+    (with-db (db :write) (dbm-put! db id (write-to-string record))))
   (match-lambda*
     [('get id) (db-get id)]
     [('mget ids) (db-mget ids)]