slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

lib: doubledatespanp: fix and re-enable doctest

Browse Source
This commit is contained in:
Henning Thielemann 2020-07-31 16:26:33 +02:00 committed by Simon Michael
parent dc41cee2b0
commit ccac09fb1b
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
hledger-lib/Hledger/Data/Dates.hs
View File

@ -979,8 +979,8 @@ periodexprdatespanp rdate = choice $ map try [
] ]
-- | -- |
-- -- >>> parsewith (doubledatespan (parsedate "2018/01/01") <* eof) "20180101-201804" -- >>> parsewith (doubledatespanp (parsedate "2018/01/01") <* eof) "20180101-201804"
-- Right DateSpan 2018-01-01..2018-04-01 -- Right DateSpan 2018Q1
doubledatespanp :: Day -> TextParser m DateSpan doubledatespanp :: Day -> TextParser m DateSpan
doubledatespanp rdate = liftA2 fromToSpan doubledatespanp rdate = liftA2 fromToSpan
(optional (string' "from" *> skipNonNewlineSpaces) *> smartdate) (optional (string' "from" *> skipNonNewlineSpaces) *> smartdate)