X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhtsn.git;a=blobdiff_plain;f=src%2FCommandLine.hs;h=d710b18c0c5d040468ef98aa0781e3f34547670e;hp=40a1ac887fe3a78de7fa762f8290e3a655ee4248;hb=64be4aa68a3ec03f318ff93af3ce9566795a993a;hpb=5f936c8d5d0806b388070cf9f231b1ff622b7541 diff --git a/src/CommandLine.hs b/src/CommandLine.hs index 40a1ac8..d710b18 100644 --- a/src/CommandLine.hs +++ b/src/CommandLine.hs @@ -46,6 +46,8 @@ arg_spec = password = def &= typ "PASSWORD" &= help password_help, output_directory = def &= typDir &= help output_directory_help, username = def &= typ "USERNAME" &= help username_help, + -- Using "def" below for the FeedHosts causes the list to show up in + -- reverse. Don't ask me why. feed_hosts = def &= typ "HOSTNAMES" } &= program program_name &= summary my_summary