mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix(web/panettone): Don't try to markdownify events

Browse source 
Events - which are interleaved with comments - don't have bodies, so
they can't be converted to markdown.

Change-Id: Iba818b95dab59cae5a08c8b4eca94955e11e584b
Reviewed-on: https://cl.tvl.fyi/c/depot/+/1509
Tested-by: BuildkiteCI
Reviewed-by: tazjin <mail@tazj.in>
This commit is contained in:
Griffin Smith 2020-07-31 22:32:42 -04:00 committed by glittershark
parent 674dbade27
commit c29f60a350
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
web/panettone/src/panettone.lisp
View file

@ -46,9 +46,9 @@
(let ((in (make-hash-table)) (let ((in (make-hash-table))
(comment-table (make-hash-table))) (comment-table (make-hash-table)))
(dolist (comment comments) (dolist (comment comments)
(check-type comment model:issue-comment) (when (typep comment 'model:issue-comment)
(setf (gethash (id comment) in) (body comment)) (setf (gethash (id comment) in) (body comment))
(setf (gethash (id comment) comment-table) comment)) (setf (gethash (id comment) comment-table) comment)))
(let ((res (render-markdown in))) (let ((res (render-markdown in)))
(iter (for (comment-id markdown-body) in-hashtable res) (iter (for (comment-id markdown-body) in-hashtable res)
(let ((comment-id (parse-integer (symbol-name comment-id)))) (let ((comment-id (parse-integer (symbol-name comment-id))))