mirror of
https://github.com/tweag/ormolu.git
synced 2024-10-26 15:35:11 +03:00
Simplify the definition of ‘optParserInfo’
This commit is contained in:
parent
9cad22a2fe
commit
a63ded8397
@ -97,7 +97,7 @@ formatOne mode config mpath = withPrettyOrmoluExceptions (cfgColorMode config) $
|
||||
return (ExitFailure 100)
|
||||
|
||||
----------------------------------------------------------------------------
|
||||
-- Command line options parsing.
|
||||
-- Command line options parsing
|
||||
|
||||
data Opts = Opts
|
||||
{ -- | Mode of operation
|
||||
@ -122,10 +122,7 @@ data Mode
|
||||
optsParserInfo :: ParserInfo Opts
|
||||
optsParserInfo =
|
||||
info (helper <*> ver <*> exts <*> optsParser) . mconcat $
|
||||
[ fullDesc,
|
||||
progDesc "",
|
||||
header ""
|
||||
]
|
||||
[fullDesc]
|
||||
where
|
||||
ver :: Parser (a -> a)
|
||||
ver =
|
||||
|
Loading…
Reference in New Issue
Block a user