diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-05-05 20:15:32 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-05-05 20:16:56 -0400 |
| commit | f7d8982672fd330a466c2cb22f34388e7cc429c0 (patch) | |
| tree | b5739058cc2cb04fa4a119df2cecf449d4846c03 /Command/Unused.hs | |
| parent | 657d09d49990af85c1a91b1154a195a30438477c (diff) | |
Fix use of several config settings
annex.ssh-options, annex.rsync-options, annex.bup-split-options.
And adjust types to avoid the bugs that broke several config settings
recently. Now "annex." prefixing is enforced at the type level.
Diffstat (limited to 'Command/Unused.hs')
| -rw-r--r-- | Command/Unused.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Unused.hs b/Command/Unused.hs index 6b319ee72..f5ee452a8 100644 --- a/Command/Unused.hs +++ b/Command/Unused.hs @@ -183,10 +183,10 @@ exclude smaller larger = S.toList $ remove larger $ S.fromList smaller -} bloomCapacity :: Annex Int bloomCapacity = fromMaybe 500000 . readish - <$> getConfig "annex.bloomcapacity" "" + <$> getConfig (annexConfig "bloomcapacity") "" bloomAccuracy :: Annex Int bloomAccuracy = fromMaybe 1000 . readish - <$> getConfig "annex.bloomaccuracy" "" + <$> getConfig (annexConfig "bloomaccuracy") "" bloomBitsHashes :: Annex (Int, Int) bloomBitsHashes = do capacity <- bloomCapacity |