From 7cedd28ab00d93b4a8d70810511a7c28cae65fd1 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 18 Aug 2011 12:26:28 -0400 Subject: tweak --- Config.hs | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/Config.hs b/Config.hs index 6f2014483..568eb7138 100644 --- a/Config.hs +++ b/Config.hs @@ -39,12 +39,9 @@ getConfig r key def = do remoteConfig :: Git.Repo -> ConfigKey -> String remoteConfig r key = "remote." ++ fromMaybe "" (Git.repoRemoteName r) ++ ".annex-" ++ key -{- Calculates cost for a remote. - - - - The default cost is 100 for local repositories, and 200 for remote - - repositories; it can also be configured by remote..annex-cost, - - or if remote..annex-cost-command is set and prints a number, that - - is used. +{- Calculates cost for a remote. Either the default, or as configured + - by remote..annex-cost, or if remote..annex-cost-command + - is set and prints a number, that is used. -} remoteCost :: Git.Repo -> Int -> Annex Int remoteCost r def = do -- cgit v1.2.3