summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Git/Fsck.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/Fsck.hs b/Git/Fsck.hs
index 85e6054..350b2bb 100644
--- a/Git/Fsck.hs
+++ b/Git/Fsck.hs
@@ -68,7 +68,7 @@ findMissing objs r = go objs [] =<< start
void $ tryIO $ catFileStop h
return $ S.fromList c
go (o:os) c h = do
- v <- tryIO $ isNothing <$> catObjectDetails h o
+ v <- tryNonAsync $ isNothing <$> catObjectDetails h o
case v of
Left _ -> do
void $ tryIO $ catFileStop h