diff options
author | Joey Hess <joey@kitenet.net> | 2014-01-26 16:25:55 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-01-26 16:25:55 -0400 |
commit | 86ffeb73d163a135e956a3c9abe8e7a35caa5d10 (patch) | |
tree | e63f0589b6f196f739379330d23ed8d802c53500 /Command/AddUrl.hs | |
parent | 3149a62a3549ea7c2ac7836d3b87490e5a052f96 (diff) |
reorganize some files and imports
Diffstat (limited to 'Command/AddUrl.hs')
-rw-r--r-- | Command/AddUrl.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Command/AddUrl.hs b/Command/AddUrl.hs index 8027c4b6bc..82b04f07b4 100644 --- a/Command/AddUrl.hs +++ b/Command/AddUrl.hs @@ -21,7 +21,6 @@ import qualified Annex.Url as Url import qualified Backend.URL import Annex.Content import Logs.Web -import qualified Option import Types.Key import Types.KeySource import Config @@ -39,13 +38,13 @@ def = [notBareRepo $ withOptions [fileOption, pathdepthOption, relaxedOption] $ SectionCommon "add urls to annex"] fileOption :: Option -fileOption = Option.field [] "file" paramFile "specify what file the url is added to" +fileOption = fieldOption [] "file" paramFile "specify what file the url is added to" pathdepthOption :: Option -pathdepthOption = Option.field [] "pathdepth" paramNumber "path components to use in filename" +pathdepthOption = fieldOption [] "pathdepth" paramNumber "path components to use in filename" relaxedOption :: Option -relaxedOption = Option.flag [] "relaxed" "skip size check" +relaxedOption = flagOption [] "relaxed" "skip size check" seek :: CommandSeek seek ps = do |