a fix for Y default year parsing
This commit is contained in:
parent
16e33b50e6
commit
1de8a3e3d3
1
Tests.hs
1
Tests.hs
@ -231,6 +231,7 @@ misc_tests = TestList [
|
|||||||
"ledgerDefaultYear" ~: do
|
"ledgerDefaultYear" ~: do
|
||||||
-- something to check default year parsing doesn't blow up
|
-- something to check default year parsing doesn't blow up
|
||||||
rl <- rawledgerfromstring "Y2009\n"
|
rl <- rawledgerfromstring "Y2009\n"
|
||||||
|
return ()
|
||||||
|
|
||||||
]
|
]
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user