Commit 027c2e14 authored by Philipp Meyer's avatar Philipp Meyer

Rewrite usage info in help

parent 26427ced
......@@ -157,4 +157,5 @@ parseArgs = do
(_, _, errs) -> return $ Left $ concat errs
usageInformation :: String
usageInformation = usageInfo "Peregrine" options
usageInformation =
usageInfo ("Usage: peregrine [OPTIONS] FILE\n") options
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment