IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

Change some more cells to tagged cells for css

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@18215 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Phil Longstaff 2009-07-18 01:54:08 +00:00
parent 3a5149fb32
commit e1d1e35332
2 changed files with 14 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/report/standard-reports/account-summary.scm
View File

@ -453,10 +453,11 @@
account-cols account-cols
) )
) )
(if show-account-bals? (if show-account-bals?
(gnc:html-table-set-cell! (gnc:html-table-set-cell/tag!
build-table 0 (+ cur-col account-cols) (_ "Balance")) build-table 0 (+ cur-col account-cols) "number-header"
) (_ "Balance"))
)
(let ((row 0)) (let ((row 0))
(while (< row table-rows) (while (< row table-rows)
(gnc:html-table-set-row-markup! build-table (+ row 1) (gnc:html-table-set-row-markup! build-table (+ row 1)
@ -476,8 +477,9 @@
(set! cur-col (+ cur-col hold-table-width)) (set! cur-col (+ cur-col hold-table-width))
(if show-account-notes? (if show-account-notes?
(begin (begin
(gnc:html-table-set-cell! (gnc:html-table-set-cell/tag!
build-table 0 cur-col (_ "Notes")) build-table 0 cur-col "text-cell"
(_ "Notes"))
(add-col 'account-notes) (add-col 'account-notes)
) )
) )

12
src/report/standard-reports/budget.scm
View File

@ -223,8 +223,8 @@
(begin (begin
(if show-budget? (if show-budget?
(begin (begin
(gnc:html-table-set-cell! (gnc:html-table-set-cell/tag!
html-table rownum current-col html-table rownum current-col "total-number-cell"
(if bgt-total-unset? "." (if bgt-total-unset? "."
(gnc:make-gnc-monetary comm bgt-total))) (gnc:make-gnc-monetary comm bgt-total)))
(set! current-col (+ current-col 1)) (set! current-col (+ current-col 1))
@ -232,16 +232,16 @@
) )
(if show-actual? (if show-actual?
(begin (begin
(gnc:html-table-set-cell! (gnc:html-table-set-cell/tag!
html-table rownum current-col html-table rownum current-col "total-number-cell"
(gnc:make-gnc-monetary comm act-total)) (gnc:make-gnc-monetary comm act-total))
(set! current-col (+ current-col 1)) (set! current-col (+ current-col 1))
) )
) )
(if show-diff? (if show-diff?
(begin (begin
(gnc:html-table-set-cell! (gnc:html-table-set-cell/tag!
html-table rownum current-col html-table rownum current-col "total-number-cell"
(if bgt-total-unset? "." (if bgt-total-unset? "."
(gnc:make-gnc-monetary comm (gnc:make-gnc-monetary comm
(gnc-numeric-sub bgt-total (gnc-numeric-sub bgt-total