[html-utilities] bugfix deprecated function

comm-list was inaccessible for the entries definition
This commit is contained in:
Christopher Lam 2020-12-04 23:33:59 +08:00
parent 9e23e41fe6
commit 410cbe3972

View File

@ -209,7 +209,7 @@
(define (gnc:html-make-exchangerates common-commodity exchange-fn accounts) (define (gnc:html-make-exchangerates common-commodity exchange-fn accounts)
(issue-deprecation-warning (issue-deprecation-warning
"gnc:html-make-exchangerates is deprecated. use gnc:html-make-rates-table instead.") "gnc:html-make-exchangerates is deprecated. use gnc:html-make-rates-table instead.")
(let ((comm-list (gnc:accounts-get-commodities accounts common-commodity)) (let* ((comm-list (gnc:accounts-get-commodities accounts common-commodity))
(entries (length comm-list)) (entries (length comm-list))
(markup (lambda (c) (gnc:make-html-table-cell/markup "number-cell" c))) (markup (lambda (c) (gnc:make-html-table-cell/markup "number-cell" c)))
(table (gnc:make-html-table))) (table (gnc:make-html-table)))