diff --git a/src/report/report-system/html-table.scm b/src/report/report-system/html-table.scm index 3ed3028b11..4a7d7ad8fb 100644 --- a/src/report/report-system/html-table.scm +++ b/src/report/report-system/html-table.scm @@ -484,7 +484,8 @@ (rest-new (cdr newcol)) (rest-existing (cdr existing-data)) (rest-result (append-to-element rest-new rest-existing - (- length-to-append 1)))) + (- length-to-append 1) + width-to-make))) (cons (cons (widen-and-append current-existing current-new