summaryrefslogtreecommitdiff
path: root/Biz
diff options
context:
space:
mode:
Diffstat (limited to 'Biz')
-rw-r--r--Biz/Lint.hs9
1 files changed, 6 insertions, 3 deletions
diff --git a/Biz/Lint.hs b/Biz/Lint.hs
index d387db0..af285a7 100644
--- a/Biz/Lint.hs
+++ b/Biz/Lint.hs
@@ -60,7 +60,10 @@ move args =
+> run mode
+> exit
where
- mode = args `Cli.has` Cli.longOption "fix" ?: (Fix, Check)
+ mode =
+ args
+ `Cli.has` Cli.longOption "fix"
+ ?: (Fix, Check)
test :: Test.Tree
test =
@@ -81,8 +84,8 @@ Usage:
lint [options] [<file>...]
Options:
- --fix, -f Apply fixes automatically
- --help, -h Print this info
+ -f, --fix Apply fixes automatically
+ -h, --help Print this info
|]
exit :: [Result] -> IO ()