summaryrefslogtreecommitdiff
path: root/Config.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-10-31 12:47:13 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-10-31 12:56:07 -0400
commit380839299ea8ffa2c98ce6219e62b979ede0c93b (patch)
tree9740bd5a861b9b47b2ee6ed5564a3b221137e115 /Config.hs
parentcc1ea8f84463c7e333bfa17a815f250d8d088841 (diff)
The fromkey command now takes the key as its first parameter. The --key option is no longer used.
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs13
1 files changed, 0 insertions, 13 deletions
diff --git a/Config.hs b/Config.hs
index f994002b9..bf929219d 100644
--- a/Config.hs
+++ b/Config.hs
@@ -10,7 +10,6 @@ module Config where
import Common.Annex
import qualified Git
import qualified Annex
-import Types.Key (readKey)
type ConfigKey = String
@@ -92,15 +91,3 @@ getNumCopies v =
g <- gitRepo
return $ read $ Git.configGet g config "1"
config = "annex.numcopies"
-
-{- The Key specified by the --key parameter. -}
-cmdlineKey :: Annex Key
-cmdlineKey = do
- k <- Annex.getState Annex.defaultkey
- case k of
- Nothing -> nokey
- Just "" -> nokey
- Just kstring -> maybe badkey return $ readKey kstring
- where
- nokey = error "please specify the key with --key"
- badkey = error "bad key"