diff --git a/ChangeLog b/ChangeLog
index 834d1caf18..ad5bbf54dd 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2001-04-27  Christian Stimming  <stimming@tuhh.de>
+
+	* src/scm/report/balance-sheet.scm: Added workaround for gtkhtml
+	column width.
+
 2001-04-27  Dave Peticolas  <dave@krondo.com>
 
 	* 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)
+			 "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;\
+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;\
+&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;")))
 
 	    (add-subtotal-line 
 	     asset-table (_ "Assets") asset-balance)