diff options
author | Joey Hess <joey@kitenet.net> | 2010-10-14 17:37:20 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-10-14 17:38:13 -0400 |
commit | 508a3b65ed675c9322940578614f088ea2c74e7f (patch) | |
tree | c3564f59aee2351d8bd7e8ce42ade05f8207e6b8 /Remotes.hs | |
parent | aa2f4bd81049e3bcaad6f5f1334864ce14887527 (diff) |
annex.numcopies works
Diffstat (limited to 'Remotes.hs')
-rw-r--r-- | Remotes.hs | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/Remotes.hs b/Remotes.hs index f20d51ab3..2fffcffa7 100644 --- a/Remotes.hs +++ b/Remotes.hs @@ -40,15 +40,7 @@ withKey key = do mayberemotes <- mapM tryGitConfigRead allremotes let allremotes' = catMaybes mayberemotes remotes' <- reposByUUID allremotes' uuids - if (0 == length remotes') - then err uuids - else return remotes' - err uuids = - error $ "no available git remotes have: " ++ - (keyFile key) ++ (uuidlist uuids) - uuidlist [] = "" - uuidlist uuids = "\nIt has been seen before in these repositories:\n" ++ - prettyPrintUUIDs uuids + return remotes' {- Cost Ordered list of remotes. -} remotesByCost :: Annex [Git.Repo] |