mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
Change some more cells to tagged cells for css
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@18215 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
3a5149fb32
commit
e1d1e35332
@ -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)
|
||||
)
|
||||
)
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user