blob: 88886dd6d4d5de4a01be513b78824613dc50fec3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
module History.IssueEvent (IssueEvent (..)) where
import History.CommitHash (CommitHash)
import Issue (Issue)
data IssueEvent
= IssueCreated
{ hash :: CommitHash,
issue :: Issue
}
| IssueChanged
{ hash :: CommitHash,
issue :: Issue
}
| IssueDeleted
{ hash :: CommitHash,
issue :: Issue
}
deriving (Show)
|
