data ListItem = ListItem {
  listItemContent :: [InlineContent]
} deriving Eq
