diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-10-01 19:10:45 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-10-01 19:10:45 -0400 |
| commit | e4fe9953317e34a64394d113d4784c28ac9804f0 (patch) | |
| tree | a799ee3b3832a974e8d7f828a2a7841c75ce09b2 | |
| parent | e4078c3749a55ee879f73f94e4218db41bbc9aa5 (diff) | |
typoe and debug info
| -rw-r--r-- | Remote/GCrypt.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Remote/GCrypt.hs b/Remote/GCrypt.hs index 74facfdc7..8ba640bac 100644 --- a/Remote/GCrypt.hs +++ b/Remote/GCrypt.hs @@ -164,7 +164,7 @@ gCryptSetup mu c = go $ M.lookup "gitrepo" c {- Run a git fetch and a push to the git repo in order to get - its gcrypt-id set up, so that later git annex commands - - will use the remote as a ggcrypt remote. The fetch is + - will use the remote as a gcrypt remote. The fetch is - needed if the repo already exists; the push is needed - if the repo has not yet been initialized by gcrypt. -} void $ inRepo $ Git.Command.runBool @@ -186,7 +186,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" + else error $ "uuid mismatch " ++ show (u, mu, 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 |