This commit is contained in:
Simon Michael 2008-10-17 00:57:00 +00:00
parent f40696fa47
commit 497daebd44
2 changed files with 3 additions and 3 deletions

View File

@ -1,7 +1,7 @@
{-|
An 'Amount' is some quantity of money, shares, or anything else.
A simple amount is a commodity, quantity pair (where commodity can be anything):
A simple amount is a commodity, quantity pair:
@
$1

View File

@ -72,8 +72,8 @@ filterRawLedgerEntriesByClearedStatus False l = l
filterRawLedgerEntriesByClearedStatus True (RawLedger ms ps es f) =
RawLedger ms ps (filter estatus es) f
-- | Strip out any (virtual transactions), if the flag is true, otherwise
-- do no filtering.
-- | Strip out any virtual transactions, if the flag is true, otherwise do
-- no filtering.
filterRawLedgerTransactionsByRealness :: Bool -> RawLedger -> RawLedger
filterRawLedgerTransactionsByRealness False l = l
filterRawLedgerTransactionsByRealness True (RawLedger ms ps es f) =