aboutsummaryrefslogtreecommitdiff
path: root/Git/Fsck.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-11-20 18:45:22 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-11-20 18:45:22 -0400
commit06de511c8033c92ad5ec01bbbd6c284a991bcfd4 (patch)
tree79958ffcb727c25d8f8f5293a51d43be72eb09d1 /Git/Fsck.hs
parent346bc6528c7999756b652e8e3f0b33f26a48dbbd (diff)
merge from git-repair
Diffstat (limited to 'Git/Fsck.hs')
-rw-r--r--Git/Fsck.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/Fsck.hs b/Git/Fsck.hs
index 85e60542b..350b2bbf1 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