Add/Use flag `-h` for `--help`, fixes #44

pull/51/head
Lennart Spitzner 2017-08-10 17:46:21 +02:00
parent 655074d1c0
commit b0f211fbfc
1 changed files with 1 additions and 1 deletions

View File

@ -100,7 +100,7 @@ mainCmdParser helpDesc = do
addCmd "license" $ addCmdImpl $ print $ licenseDoc
-- addButcherDebugCommand
reorderStart
printHelp <- addSimpleBoolFlag "" ["help"] mempty
printHelp <- addSimpleBoolFlag "h" ["help"] mempty
printVersion <- addSimpleBoolFlag "" ["version"] mempty
printLicense <- addSimpleBoolFlag "" ["license"] mempty
inputPaths <- addFlagStringParams "i" ["input"] "PATH" (flagHelpStr "path to input haskell source file")