;add then and t to --value's error message
[ci skip]
This commit is contained in:
parent
05814e6fe7
commit
ae9d8d6e56
@ -365,7 +365,7 @@ valuationTypeFromRawOpts = lastMay . collectopts valuationfromrawopt
|
||||
| otherwise =
|
||||
case parsedateM t of
|
||||
Just d -> AtDate d mc
|
||||
Nothing -> usageError $ "could not parse \""++t++"\" as valuation type, should be: cost|end|now|c|e|n|YYYY-MM-DD"
|
||||
Nothing -> usageError $ "could not parse \""++t++"\" as valuation type, should be: cost|then|end|now|c|t|e|n|YYYY-MM-DD"
|
||||
where
|
||||
-- parse --value's value: TYPE[,COMM]
|
||||
(t,c') = break (==',') v
|
||||
|
||||
Loading…
Reference in New Issue
Block a user