From 576417655ce30230e39cf80f3546fdadf4ffb620 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Sat, 19 Oct 2024 16:15:55 -1000 Subject: [PATCH] dev: fix stray empty strings in builtinCommandNames --- hledger/Hledger/Cli/CliOptions.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hledger/Hledger/Cli/CliOptions.hs b/hledger/Hledger/Cli/CliOptions.hs index d55a9d0c1..23710637f 100644 --- a/hledger/Hledger/Cli/CliOptions.hs +++ b/hledger/Hledger/Cli/CliOptions.hs @@ -471,7 +471,7 @@ parseCommandHelp :: CommandHelpStr -> Maybe CommandHelp parseCommandHelp t = case lines t of [] -> Nothing - (l1:_:l3:ls) -> Just $ CommandHelp cmdname (Just cmdalias) preamble postamble + (l1:_:l3:ls) -> Just $ CommandHelp cmdname (if null cmdalias then Nothing else Just cmdalias) preamble postamble where cmdname = l1 (cmdalias, rest) =