ilyakooo0/optparse-applicative
1
0
Fork 0
mirror of https://github.com/ilyakooo0/optparse-applicative.git synced 2024-11-22 22:18:13 +03:00
Code Issues Projects Releases Wiki Activity

Don't show help text on InfoMsg.

Browse Source
This commit is contained in:
Ian Grant Jeffries 2018-10-01 14:32:12 -04:00 committed by Huw Campbell
parent 908356897a
commit 512b7c1f79
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Options/Applicative/Extra.hs
View File

@ -282,6 +282,7 @@ parserFailure pprefs pinfo msg ctx = ParserFailure $ \progn ->
ShowHelpText -> True
MissingError CmdStart _ | prefShowHelpOnEmpty pprefs
-> True
InfoMsg _ -> False
_ -> prefShowHelpOnError pprefs
renderFailure :: ParserFailure ParserHelp -> String -> (String, ExitCode)