move inputParams into the reordered block

pull/60/head
d-dorazio 2017-10-04 20:56:37 +02:00
parent f21c6b6eac
commit 752048882e
1 changed files with 1 additions and 1 deletions

View File

@ -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