aboutsummaryrefslogtreecommitdiff
path: root/Remote/GCrypt.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-10-28 15:54:44 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-10-28 15:54:44 -0400
commitf28dbe06257b5d2fd3a3120d97dcd676bf5b46b0 (patch)
treeb8b0770905367a1757b9c9192b44e7d64925c7ea /Remote/GCrypt.hs
parentb2fb74a7816500f3fdc0be1e1092a20cbb07f5a1 (diff)
improve uuid mismatch message
Diffstat (limited to 'Remote/GCrypt.hs')
-rw-r--r--Remote/GCrypt.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/GCrypt.hs b/Remote/GCrypt.hs
index 995c3e838..9aa70d57e 100644
--- a/Remote/GCrypt.hs
+++ b/Remote/GCrypt.hs
@@ -202,7 +202,7 @@ gCryptSetup mu _ c = go $ M.lookup "gitrepo" c
method <- setupRepo gcryptid =<< inRepo (Git.Construct.fromRemoteLocation gitrepo)
gitConfigSpecialRemote u c' "gcrypt" (fromAccessMethod method)
return (c', u)
- else error $ "uuid mismatch " ++ show (u, mu, gcryptid)
+ else error $ "uuid mismatch; expected " ++ show mu ++ " but remote gitrepo has " ++ show u ++ " (" ++ show gcryptid ++ ")"
{- Sets up the gcrypt repository. The repository is either a local
- repo, or it is accessed via rsync directly, or it is accessed over ssh