aliens/tekuti
1
0
Fork 0
Code Activity

Fix serializing no-comments-closed-date state

Browse source
This commit is contained in:
Andy Wingo 2021-03-08 15:16:26 +01:00
parent 60bc3db10f
commit d6cee09123
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tekuti/post.scm
View file

@ -163,7 +163,9 @@
(let ((metadata (with-output-to-blob
(for-each
(lambda (k)
(format #t "~a: ~a\n" k (assq-ref parsed k)))
(cond
((assq-ref parsed k)
=> (lambda (v) (format #t "~a: ~a\n" k v)))))
'(timestamp tags status title name comment_status
comments-closed-timestamp))))
(content (with-output-to-blob (display (assq-ref parsed 'body))))