lib: note issues

This commit is contained in:
Simon Michael 2016-05-06 17:19:23 -07:00
parent e7a1eb627f
commit 6cbc0ceb0d
2 changed files with 2 additions and 2 deletions

View File

@ -395,7 +395,7 @@ same [] = True
same (a:as) = all (a==) as
-- | Remove query terms (or whole sub-expressions) not matching the given
-- predicate from this query. XXX Semantics not yet clear.
-- predicate from this query. XXX Semantics not completely clear.
filterQuery :: (Query -> Bool) -> Query -> Query
filterQuery p = simplifyQuery . filterQuery' p

View File

@ -68,7 +68,7 @@ postingsReportAsCsv (_,is) =
postingsReportItemAsCsvRecord :: PostingsReportItem -> Record
postingsReportItemAsCsvRecord (_, _, _, p, b) = [date,desc,acct,amt,bal]
where
date = showDate $ postingDate p
date = showDate $ postingDate p -- XXX csv should show date2 with --date2
desc = maybe "" tdescription $ ptransaction p
acct = bracket $ paccount p
where