mirror of
https://github.com/Gnucash/gnucash.git
synced 2024-12-02 05:29:20 -06:00
[new-aging] step 4 - prepended lists must be reversed
after building lists by prepending in b72052137
we need to process
them in reverse to obtain the original sorting of accounts and
owner-list.
This commit is contained in:
parent
6f7c6b9de3
commit
a482c25072
@ -286,6 +286,7 @@ exist but have no suitable transactions."))
|
||||
(let ((owner (car owner-and-aging))
|
||||
(aging (cadr owner-and-aging))
|
||||
(aging-total (caddr owner-and-aging)))
|
||||
|
||||
(gnc:html-table-append-row!
|
||||
table
|
||||
(append
|
||||
@ -308,7 +309,8 @@ exist but have no suitable transactions."))
|
||||
(gnc:owner-report-text owner account)
|
||||
(gnc:make-gnc-monetary comm aging-total)))))
|
||||
(options->address options receivable owner)))))
|
||||
owners-and-aging)
|
||||
(reverse owners-and-aging))
|
||||
|
||||
(gnc:html-table-append-row!
|
||||
table
|
||||
(append
|
||||
@ -320,7 +322,8 @@ exist but have no suitable transactions."))
|
||||
(gnc:make-html-table-cell/markup
|
||||
"total-number-cell" (gnc:make-gnc-monetary comm amt)))
|
||||
acc-totals)))))
|
||||
accounts-and-owners)
|
||||
(reverse accounts-and-owners))
|
||||
|
||||
(for-each gncOwnerFree tofree)
|
||||
(gnc:html-document-add-object! document table)))))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user