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

note lack of date2 support in (eg) postingsReport

Browse Source
This commit is contained in:
Simon Michael 2014-12-24 14:44:39 -08:00
parent 6780c63ab3
commit d1404adf3f
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
hledger-lib/Hledger/Reports/PostingsReport.hs
View File

@ -60,7 +60,8 @@ postingsReport opts q j = (totallabel, items)
datelessq = filterQuery (not . queryIsDate) q datelessq = filterQuery (not . queryIsDate) q
(dateqcons,pdate) | date2_ opts = (Date2, postingDate2) (dateqcons,pdate) | date2_ opts = (Date2, postingDate2)
| otherwise = (Date, postingDate) | otherwise = (Date, postingDate)
requestedspan = dbg "requestedspan" $ queryDateSpan (date2_ opts) q -- span specified by -b/-e/-p options and query args requestedspan = dbg "requestedspan" $ queryDateSpan (date2_ opts) q -- span specified by -b/-e/-p options and query args
-- XXX doesn't handle date2:
requestedspan' = dbg "requestedspan'" $ requestedspan `spanDefaultsFrom` journalDateSpan (date2_ opts) j -- if open-ended, close it using the journal's end dates requestedspan' = dbg "requestedspan'" $ requestedspan `spanDefaultsFrom` journalDateSpan (date2_ opts) j -- if open-ended, close it using the journal's end dates
intervalspans = dbg "intervalspans" $ splitSpan (intervalFromOpts opts) requestedspan' -- interval spans enclosing it intervalspans = dbg "intervalspans" $ splitSpan (intervalFromOpts opts) requestedspan' -- interval spans enclosing it
reportstart = dbg "reportstart" $ maybe Nothing spanStart $ headMay intervalspans reportstart = dbg "reportstart" $ maybe Nothing spanStart $ headMay intervalspans