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

convert error to giveup

Browse source
This commit is contained in:
Joey Hess 2017-03-01 12:35:16 -04:00
parent bd5b277c11
commit de43d1d407
No known key found for this signature in database
GPG key ID: C910D9222512E3C7
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Backend.hs
View file

@ -94,7 +94,7 @@ chooseBackend f = Annex.getState Annex.forcebackend >>= go
lookupBackendVariety :: KeyVariety -> Backend
lookupBackendVariety v = fromMaybe unknown $ maybeLookupBackendVariety v
where
unknown = error $ "unknown backend " ++ formatKeyVariety v
unknown = giveup $ "unknown backend " ++ formatKeyVariety v
maybeLookupBackendVariety :: KeyVariety -> Maybe Backend
maybeLookupBackendVariety v = M.lookup v varietyMap