diff options
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 8027c4b6b..82b04f07b 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 |