From 7ee3b02d49a00d4e5ef197cfc5aba2a6bf083d2b Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 20 Aug 2018 21:26:07 -0400 Subject: [PATCH] replace stack trace with an explanation --- Command/Reinject.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Command/Reinject.hs b/Command/Reinject.hs index bde4c81ea1..428cccf602 100644 --- a/Command/Reinject.hs +++ b/Command/Reinject.hs @@ -47,7 +47,7 @@ startSrcDest (src:dest:[]) where go key = ifM (verifyKeyContent RetrievalAllKeysSecure DefaultVerify UnVerified key src) ( perform src key - , error "failed" + , giveup $ src ++ " does not have expected content of " ++ dest ) startSrcDest _ = giveup "specify a src file and a dest file"