From 410cbe39720e974315434515beaa815116bddbca Mon Sep 17 00:00:00 2001 From: Christopher Lam Date: Fri, 4 Dec 2020 23:33:59 +0800 Subject: [PATCH] [html-utilities] bugfix deprecated function comm-list was inaccessible for the entries definition --- gnucash/report/html-utilities.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/gnucash/report/html-utilities.scm b/gnucash/report/html-utilities.scm index fc8b80ead9..ca6a2941d4 100644 --- a/gnucash/report/html-utilities.scm +++ b/gnucash/report/html-utilities.scm @@ -209,10 +209,10 @@ (define (gnc:html-make-exchangerates common-commodity exchange-fn accounts) (issue-deprecation-warning "gnc:html-make-exchangerates is deprecated. use gnc:html-make-rates-table instead.") - (let ((comm-list (gnc:accounts-get-commodities accounts common-commodity)) - (entries (length comm-list)) - (markup (lambda (c) (gnc:make-html-table-cell/markup "number-cell" c))) - (table (gnc:make-html-table))) + (let* ((comm-list (gnc:accounts-get-commodities accounts common-commodity)) + (entries (length comm-list)) + (markup (lambda (c) (gnc:make-html-table-cell/markup "number-cell" c))) + (table (gnc:make-html-table))) (unless (= 0 entries) (for-each (lambda (commodity)