diff --git a/src/report/standard-reports/account-summary.scm b/src/report/standard-reports/account-summary.scm index b1f3dfb451..44ea7d59b2 100644 --- a/src/report/standard-reports/account-summary.scm +++ b/src/report/standard-reports/account-summary.scm @@ -453,10 +453,11 @@ account-cols ) ) - (if show-account-bals? - (gnc:html-table-set-cell! - build-table 0 (+ cur-col account-cols) (_ "Balance")) - ) + (if show-account-bals? + (gnc:html-table-set-cell/tag! + build-table 0 (+ cur-col account-cols) "number-header" + (_ "Balance")) + ) (let ((row 0)) (while (< row table-rows) (gnc:html-table-set-row-markup! build-table (+ row 1) @@ -476,8 +477,9 @@ (set! cur-col (+ cur-col hold-table-width)) (if show-account-notes? (begin - (gnc:html-table-set-cell! - build-table 0 cur-col (_ "Notes")) + (gnc:html-table-set-cell/tag! + build-table 0 cur-col "text-cell" + (_ "Notes")) (add-col 'account-notes) ) ) diff --git a/src/report/standard-reports/budget.scm b/src/report/standard-reports/budget.scm index 3a8a3715b7..34f50a9fef 100644 --- a/src/report/standard-reports/budget.scm +++ b/src/report/standard-reports/budget.scm @@ -223,8 +223,8 @@ (begin (if show-budget? (begin - (gnc:html-table-set-cell! - html-table rownum current-col + (gnc:html-table-set-cell/tag! + html-table rownum current-col "total-number-cell" (if bgt-total-unset? "." (gnc:make-gnc-monetary comm bgt-total))) (set! current-col (+ current-col 1)) @@ -232,16 +232,16 @@ ) (if show-actual? (begin - (gnc:html-table-set-cell! - html-table rownum current-col + (gnc:html-table-set-cell/tag! + html-table rownum current-col "total-number-cell" (gnc:make-gnc-monetary comm act-total)) (set! current-col (+ current-col 1)) ) ) (if show-diff? (begin - (gnc:html-table-set-cell! - html-table rownum current-col + (gnc:html-table-set-cell/tag! + html-table rownum current-col "total-number-cell" (if bgt-total-unset? "." (gnc:make-gnc-monetary comm (gnc-numeric-sub bgt-total