imp: simplify bad account type error message
This commit is contained in:
parent
57b1e18757
commit
b23af9275d
@ -511,7 +511,7 @@ parseTypeCodes s =
|
|||||||
([],[]) -> Left help
|
([],[]) -> Left help
|
||||||
([],ts) -> Right $ Type ts
|
([],ts) -> Right $ Type ts
|
||||||
where
|
where
|
||||||
help = "type:'s argument should be one or more of " ++ accountTypeChoices False ++ " (case insensitive)."
|
help = "type:'s argument should be one or more of " ++ accountTypeChoices False
|
||||||
|
|
||||||
accountTypeChoices :: Bool -> String
|
accountTypeChoices :: Bool -> String
|
||||||
accountTypeChoices allowlongform =
|
accountTypeChoices allowlongform =
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user