web: fix wrong transaction amount in account register with virtual postings
This commit is contained in:
parent
fa5f09f06a
commit
6142847dd2
@ -433,7 +433,7 @@ accountTransactionsReportItems matcher thisacctmatcher bal signfn (t:ts) =
|
||||
(psthisacct,psotheracct) = case thisacctmatcher of Just m -> partition (matchesPosting m) psmatched
|
||||
Nothing -> ([],psmatched)
|
||||
numotheraccts = length $ nub $ map paccount psotheracct
|
||||
amt = sum $ map pamount psotheracct
|
||||
amt = negate $ sum $ map pamount psthisacct
|
||||
acct | isNothing thisacctmatcher = summarisePostings psmatched -- journal register
|
||||
| numotheraccts == 0 = "transfer between " ++ summarisePostingAccounts psthisacct
|
||||
| otherwise = prefix ++ summarisePostingAccounts psotheracct
|
||||
|
||||
Loading…
Reference in New Issue
Block a user