Rewrite usage info in help

027c2e14 · Philipp Meyer · 26427ced · 027c2e14
Commit 027c2e14 authored May 02, 2017 by Philipp Meyer
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

src/Options.hs src/Options.hs +2 -1

No files found.
--- a/src/Options.hs
+++ b/src/Options.hs
@@ -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