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

left an unhandled case in previous commit

Browse source
This commit is contained in:
Joey Hess 2020-05-15 14:31:50 -04:00
parent cdbfaae706
commit 0a9a3ed1c3
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
Annex/Ingest.hs
View file

@ -172,6 +172,7 @@ ingest' preferredbackend meterupdate (Just (LockedDown cfg source)) mk restage =
go key mcache (Just s) go key mcache (Just s)
| lockingFile cfg = golocked key mcache s | lockingFile cfg = golocked key mcache s
| otherwise = gounlocked key mcache s | otherwise = gounlocked key mcache s
go _ _ Nothing = failure "failed to generate a key"
golocked key mcache s = golocked key mcache s =
tryNonAsync (moveAnnex key $ fromRawFilePath $ contentLocation source) >>= \case tryNonAsync (moveAnnex key $ fromRawFilePath $ contentLocation source) >>= \case