-- | If an event is the accompanying comment to the closing of an issue.
isClosingIssueComment :: EventPayload -> Bool
isClosingIssueComment IssueCommentEvent{..}
  =  issClosed_at ecoIssue == Just (comCreated_at ecoComment)
isClosingIssueComment :: EventPayload -> Bool
isClosingIssueComment IssueCommentEvent{..}
  =  issClosed_at ecoIssue == Just (comCreated_at ecoComment)
isClosingIssueComment IssueCommentEvent{..}
  =  issClosed_at ecoIssue == Just (comCreated_at ecoComment)