summaryrefslogtreecommitdiff
path: root/Backend/File.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-16 16:15:31 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-16 16:15:31 -0400
commit6d13ae10cf1d295b64855984f5a526f8209f3341 (patch)
tree70baa5f95943631e0f0e03a86ef8f57ee5480680 /Backend/File.hs
parent81d628a8cd6f20c2ef336271ae03376dc75b6920 (diff)
git annex describe
Diffstat (limited to 'Backend/File.hs')
-rw-r--r--Backend/File.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Backend/File.hs b/Backend/File.hs
index b2c5c90eb..c443b4f7a 100644
--- a/Backend/File.hs
+++ b/Backend/File.hs
@@ -58,7 +58,7 @@ copyKeyFile key file = do
else return ()
trycopy remotes remotes
where
- trycopy full [] = error $ "unable to get: " ++ (keyFile key) ++ "\n" ++
+ trycopy full [] = error $ "unable to get file with key: " ++ (keyFile key) ++ "\n" ++
"To get that file, need access to one of these remotes: " ++
(Remotes.list full)
trycopy full (r:rs) = do
@@ -79,7 +79,7 @@ copyKeyFile key file = do
g <- Annex.gitRepo
uuids <- liftIO $ keyLocations g key
ppuuids <- prettyPrintUUIDs uuids
- error $ "no available git remotes have: " ++
+ error $ "no available git remotes have file with key: " ++
(keyFile key) ++
if (0 < length uuids)
then "\nIt has been seen before in these repositories:\n" ++ ppuuids