From 7927597b3a7e043a9993f5af5d33222f09886f82 Mon Sep 17 00:00:00 2001 From: Christopher Lam Date: Sat, 2 Jun 2018 16:25:58 +0800 Subject: [PATCH] [html-table] gnc:html-table-set-row-style! uses cons* This cons* call creates a pair-terminated list. --- gnucash/report/report-system/html-table.scm | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/gnucash/report/report-system/html-table.scm b/gnucash/report/report-system/html-table.scm index 157dcdc6fe..2f224e3f1f 100644 --- a/gnucash/report/report-system/html-table.scm +++ b/gnucash/report/report-system/html-table.scm @@ -746,8 +746,5 @@ retval)) (define (gnc:html-table-set-last-row-style! table tag . rest) - (let ((arg-list - (cons table - (cons (1- (gnc:html-table-num-rows table)) - (cons tag rest))))) - (apply gnc:html-table-set-row-style! arg-list))) + (apply gnc:html-table-set-row-style! + (cons* table (1- (gnc:html-table-num-rows table)) tag rest)))