Add formatting to table.

Add cell padding to columns in table.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@22222 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Mike Evans 2012-06-16 11:52:51 +00:00
parent f841832eaf
commit 331bcf384b

View File

@ -416,6 +416,11 @@
(gnc:html-document-add-object! document chart)
(if show-table?
(let ((table (gnc:make-html-table)))
(gnc:html-table-set-style!
table "table"
'attribute (list "border" 0)
'attribute (list "cellspacing" 0)
'attribute (list "cellpadding" 4))
(gnc:html-table-set-col-headers!
table
(append