aboutsummaryrefslogtreecommitdiffstats
path: root/app/History.hs
diff options
context:
space:
mode:
authorLibravatar Alexander Foremny <aforemny@posteo.de>2023-11-30 13:28:30 +0100
committerLibravatar Alexander Foremny <aforemny@posteo.de>2023-11-30 14:40:17 +0100
commit773dd51aec39ef4ef8d5818ffe279b0737d4d567 (patch)
treef26033b2c0294857d25cf6dc5aa0a5b7791663c3 /app/History.hs
parent4718d91d1a641b255fec2dd8a9b36fd3d4e60ea6 (diff)
feat: add -p|--patch to log command
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)