dev: fix stray empty strings in builtinCommandNames
This commit is contained in:
parent
f5b10b2d40
commit
576417655c
@ -471,7 +471,7 @@ parseCommandHelp :: CommandHelpStr -> Maybe CommandHelp
|
|||||||
parseCommandHelp t =
|
parseCommandHelp t =
|
||||||
case lines t of
|
case lines t of
|
||||||
[] -> Nothing
|
[] -> 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
|
where
|
||||||
cmdname = l1
|
cmdname = l1
|
||||||
(cmdalias, rest) =
|
(cmdalias, rest) =
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user