Delete this comment
$forall (Entity replyId reply) <- replies
$if commentParent reply == Just commentId
#{fromJust $ commentAuthorSlug reply} wrote on #{formatTime defaultTimeLocale "%A %F %H:%M" $ commentTime reply}:
#{commentContent reply}
$if userId == (commentAuthor comment)
Delete this comment
$if userId /= Nothing