mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

comment typo

Browse source
This commit is contained in:
Joey Hess 2018-11-12 11:53:44 -04:00
parent 911f75232b
commit a0e573a3cc
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
P2P/Annex.hs
View file

@ -58,7 +58,7 @@ runLocal runst runner a = case a of
Right (Left e) -> return $ Left e Right (Left e) -> return $ Left e
Right (Right ok) -> runner (next ok) Right (Right ok) -> runner (next ok)
-- If the content is not present, or the transfer doesn't -- If the content is not present, or the transfer doesn't
-- run for any other action, the sender action still must -- run for any other reason, the sender action still must
-- be run, so is given empty and Invalid data. -- be run, so is given empty and Invalid data.
let fallback = runner (sender mempty (return Invalid)) let fallback = runner (sender mempty (return Invalid))
v <- tryNonAsync $ prepSendAnnex k v <- tryNonAsync $ prepSendAnnex k