From 421fc9542e6a293a929fe3c344cffa057474613a Mon Sep 17 00:00:00 2001 From: Dave Peticolas Date: Fri, 27 Apr 2001 19:04:52 +0000 Subject: [PATCH] 2001-04-27 Christian Stimming * src/scm/report/balance-sheet.scm: Added workaround for gtkhtml column width. git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@4078 57a11ea4-9604-0410-9ed3-97b8803252fd --- ChangeLog | 5 +++++ src/scm/report/balance-sheet.scm | 12 +++++++++--- 2 files changed, 14 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 834d1caf18..ad5bbf54dd 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2001-04-27 Christian Stimming + + * src/scm/report/balance-sheet.scm: Added workaround for gtkhtml + column width. + 2001-04-27 Dave Peticolas * src/SplitLedger.c (xaccSRExpandCurrentTrans): if expanding diff --git a/src/scm/report/balance-sheet.scm b/src/scm/report/balance-sheet.scm index e93860a0cc..8ca399bcc7 100644 --- a/src/scm/report/balance-sheet.scm +++ b/src/scm/report/balance-sheet.scm @@ -277,9 +277,15 @@ (gnc:html-table-prepend-row/markup! asset-table "primary-subheading" - (list (gnc:html-acct-table-cell (* (if show-fcur? 3 2) - tree-depth) - (_ "Assets") #t))) + (append + (list (gnc:html-acct-table-cell tree-depth + (_ "Assets") #t)) + ;; Workaround to force gtkhtml into displaying wide + ;; enough columns. + (make-list (* (if show-fcur? 2 1) tree-depth) + "     \ +     \ +     "))) (add-subtotal-line asset-table (_ "Assets") asset-balance)