summaryrefslogtreecommitdiff
path: root/Biz/Cli.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Biz/Cli.hs')
-rw-r--r--Biz/Cli.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Biz/Cli.hs b/Biz/Cli.hs
index 435ded2..b3c7583 100644
--- a/Biz/Cli.hs
+++ b/Biz/Cli.hs
@@ -38,7 +38,7 @@ main Plan {..} =
if args `has` Docopt.command "test"
then Test.run test
else
- if args `has` Docopt.longOption "help"
+ if args `has` Docopt.longOption "help" || args `has` Docopt.shortOption 'h'
then Docopt.exitWithUsage help
else move args