)
where
-import System.Console.CmdArgs
+import System.Console.CmdArgs (
+ Data,
+ Typeable,
+ (&=),
+ args,
+ auto,
+ cmdArgs,
+ def,
+ details,
+ explicit,
+ groupname,
+ help,
+ helpArg,
+ modes,
+ name,
+ program,
+ summary,
+ typ,
+ versionArg )
-- Get the version from Cabal.
-import Paths_haeres (version)
+import Paths_haeredes (version)
import Data.Version (showVersion)
ns_description :: String
mx_description = "Confirm delegation of MX records."
program_name :: String
-program_name = "haeres"
+program_name = "haeredes"
my_summary :: String
my_summary = program_name ++ "-" ++ (showVersion version)
ns :: Args
ns = NS {
server = def
- &= groupname "Common flags"
- &= typ "IP"
- &= help server_help,
+ &= groupname "Common flags"
+ &= typ "IP"
+ &= help server_help,
delegates = def
- &= args
- &= typ "DELEGATES" }
+ &= args
+ &= typ "DELEGATES" }
&= details [ns_description]