From c87570a497e03e9160a3c64e332e17788b04d11c Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 1 Mar 2017 12:35:16 -0400 Subject: convert error to giveup --- Backend.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Backend.hs b/Backend.hs index 40b618355..da7d9f6e1 100644 --- a/Backend.hs +++ b/Backend.hs @@ -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 -- cgit v1.2.3