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 6247108..6a4ddbe 100644
--- a/app/History.hs
+++ b/app/History.hs
@@ -31,6 +31,6 @@ getHistory :: IO [(CommitHash, [IssueEvent], [Issue])]
getHistory = do
commitInfos <- fromPartialCommitInfos <$> getPartialCommitInfos
let commitHashes = map (.hash) commitInfos
- issueEventses = map (._2) $ issueEvents commitInfos
issueses = map (.issues) commitInfos
+ issueEventses <- map (._2) <$> issueEvents commitInfos
pure (zip3 commitHashes issueEventses issueses)