From c2245260b1e6e3bd9a8827449fea2c0eafe7e0f2 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 16 Feb 2012 12:37:30 -0400 Subject: [PATCH] improve usage --- Command/AddUrl.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Command/AddUrl.hs b/Command/AddUrl.hs index a6c89542e0..9867369438 100644 --- a/Command/AddUrl.hs +++ b/Command/AddUrl.hs @@ -29,7 +29,7 @@ fileOption :: Option fileOption = Option.field [] "file" paramFile "specify what file the url is added to" pathdepthOption :: Option -pathdepthOption = Option.field [] "pathdepth" paramFile "number of path components to use in filename" +pathdepthOption = Option.field [] "pathdepth" paramNumber "path components to use in filename" seek :: [CommandSeek] seek = [withField fileOption return $ \f ->