aboutsummaryrefslogtreecommitdiffstats
path: root/app/History.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/History.hs')
-rw-r--r--app/History.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/app/History.hs b/app/History.hs
index d9f434d..72ca2d9 100644
--- a/app/History.hs
+++ b/app/History.hs
@@ -191,7 +191,7 @@ newIssueEvents oldIssues' commitHash issues' =
| (newIssue : oldIssue : _) <- intersectBy' eq issues oldIssues,
neq newIssue oldIssue
],
- [IssueDeleted commitHash issue <$> patchDeleted issue | issue <- deleteFirstsBy eq oldIssues issues]
+ [IssueDeleted commitHash issue {I.closed = True} <$> patchDeleted issue | issue <- deleteFirstsBy eq oldIssues issues]
]
where
issues = filter (not . (.closed)) issues'