module History.IssueEvent (IssueEvent (..)) where

import History.CommitHash (CommitHash)
import Issue (Issue)
import Patch (Patch)

data IssueEvent
  = IssueCreated
      { hash :: CommitHash,
        issue :: Issue,
        patch :: Patch
      }
  | IssueChanged
      { hash :: CommitHash,
        oldIssue :: Issue,
        issue :: Issue,
        patch :: Patch
      }
  | IssueDeleted
      { hash :: CommitHash,
        issue :: Issue,
        patch :: Patch
      }
  deriving (Show)