aboutsummaryrefslogtreecommitdiff
path: root/Main.hs
diff options
context:
space:
mode:
authorMirek Kratochvil <miroslav.kratochvil@matfyz.cuni.cz>2026-09-11 13:25:26 +0200
committerMirek Kratochvil <miroslav.kratochvil@matfyz.cuni.cz>2026-09-11 13:25:26 +0200
commit317ac73190513b493b652ea036569d2933182ec9 (patch)
treeedbc5721cbeb50824c596dcd1cbff94a7eb86a8a /Main.hs
parent50d75b061256fa0f4147797205496a5f71695727 (diff)
downloadgit-auto-acp-317ac73190513b493b652ea036569d2933182ec9.tar.gz
git-auto-acp-317ac73190513b493b652ea036569d2933182ec9.tar.bz2
tabulate more
Diffstat (limited to 'Main.hs')
-rw-r--r--Main.hs7
1 files changed, 5 insertions, 2 deletions
diff --git a/Main.hs b/Main.hs
index 278e92e..65de635 100644
--- a/Main.hs
+++ b/Main.hs
@@ -124,8 +124,11 @@ opts = do
, showDefault
]
optDebug <-
- flag' True ~~ [long "debug", help "be super verbose about what's happening"]
- <|> pure False
+ asum
+ [ flag' True
+ ~~ [long "debug", help "be super verbose about what's happening"]
+ , pure False
+ ]
pure Opts {..}
delaySec :: Float -> IO ()