move inputParams into the reordered block
parent
f21c6b6eac
commit
752048882e
|
@ -133,8 +133,8 @@ mainCmdParser helpDesc = do
|
||||||
{ _flag_help = Just (PP.text "output mode: [display|inplace]")
|
{ _flag_help = Just (PP.text "output mode: [display|inplace]")
|
||||||
, _flag_default = Just Display
|
, _flag_default = Just Display
|
||||||
}
|
}
|
||||||
reorderStop
|
|
||||||
inputParams <- addParamNoFlagStrings "PATH" (paramHelpStr "paths to input haskell source files")
|
inputParams <- addParamNoFlagStrings "PATH" (paramHelpStr "paths to input haskell source files")
|
||||||
|
reorderStop
|
||||||
desc <- peekCmdDesc
|
desc <- peekCmdDesc
|
||||||
addCmdImpl $ void $ do
|
addCmdImpl $ void $ do
|
||||||
when printLicense $ do
|
when printLicense $ do
|
||||||
|
|
Loading…
Reference in New Issue