mirror of
https://github.com/Gnucash/gnucash.git
synced 2024-11-23 09:26:27 -06:00
[html-utilities] use new price renderer for exchange-rate table
This commit is contained in:
parent
9020c967c7
commit
61afe53f0f
@ -734,9 +734,12 @@
|
||||
(for-each
|
||||
(lambda (commodity)
|
||||
(let* ((orig-amt (gnc:make-gnc-monetary commodity 1))
|
||||
(exchanged (exchange-fn orig-amt common-commodity)))
|
||||
(exchanged (exchange-fn orig-amt common-commodity))
|
||||
(conv-amount (gnc:gnc-monetary-amount exchanged)))
|
||||
(gnc:html-table-append-row!
|
||||
table (map markup (list orig-amt exchanged)))))
|
||||
table (list (markup orig-amt)
|
||||
(markup (gnc:default-price-renderer common-commodity
|
||||
conv-amount))))))
|
||||
comm-list)
|
||||
(gnc:html-table-set-col-headers!
|
||||
table (list (gnc:make-html-table-header-cell/size
|
||||
|
Loading…
Reference in New Issue
Block a user