lib: note issues
This commit is contained in:
parent
e7a1eb627f
commit
6cbc0ceb0d
@ -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
|
||||
|
||||
|
||||
@ -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
|
||||
|
||||
Loading…
Reference in New Issue
Block a user