diff --git a/gnucash/report/report-system/html-fonts.scm b/gnucash/report/report-system/html-fonts.scm
index fee9af93fa..d87ba13993 100644
--- a/gnucash/report/report-system/html-fonts.scm
+++ b/gnucash/report/report-system/html-fonts.scm
@@ -132,7 +132,7 @@
 )
 
 ;; Adds CSS style information to an html document
-(define (add-css-information-to-doc options ssdoc)
+(define (add-css-information-to-doc options ssdoc doc)
     (let*
         ((opt-val 
             (lambda (section name)
@@ -173,6 +173,7 @@
                 "td.total-number-cell { " total-number-cell-font-info " }\n"
                 "td.total-label-cell { " total-label-cell-font-info " }\n"
                 "td.centered-label-cell { text-align: center; " centered-label-cell-font-info " }\n"
+                (or (gnc:html-document-style-text doc) "")
             )
         )
     )
diff --git a/gnucash/report/stylesheets/stylesheet-easy.scm b/gnucash/report/stylesheets/stylesheet-easy.scm
index c380acd67c..3f5cff55d8 100644
--- a/gnucash/report/stylesheets/stylesheet-easy.scm
+++ b/gnucash/report/stylesheets/stylesheet-easy.scm
@@ -344,7 +344,7 @@
       (if (and logopixmap (> (string-length logopixmap) 0))
         (set! headcolumn 1))
 
-      (add-css-information-to-doc options ssdoc)
+      (add-css-information-to-doc options ssdoc doc)
 
       (let* ((title (gnc:html-document-title doc))
              (doc-headline (gnc:html-document-headline doc))
diff --git a/gnucash/report/stylesheets/stylesheet-fancy.scm b/gnucash/report/stylesheets/stylesheet-fancy.scm
index 2ea37d390b..46f2bc124b 100644
--- a/gnucash/report/stylesheets/stylesheet-fancy.scm
+++ b/gnucash/report/stylesheets/stylesheet-fancy.scm
@@ -325,7 +325,7 @@
 	(gnc:html-document-set-style!
 	 ssdoc "a" 'tag ""))
     
-    (add-css-information-to-doc options ssdoc)
+    (add-css-information-to-doc options ssdoc doc)
 
     (let ((t (gnc:make-html-table)))
       ;; we don't want a bevel for this table, but we don't want 
diff --git a/gnucash/report/stylesheets/stylesheet-footer.scm b/gnucash/report/stylesheets/stylesheet-footer.scm
index 37a198acee..3464d582b9 100644
--- a/gnucash/report/stylesheets/stylesheet-footer.scm
+++ b/gnucash/report/stylesheets/stylesheet-footer.scm
@@ -343,7 +343,7 @@
     (if (not links?)
 	  (gnc:html-document-set-style! ssdoc "a" 'tag ""))
     
-    (add-css-information-to-doc options ssdoc)
+    (add-css-information-to-doc options ssdoc doc)
 
     (let ((t (gnc:make-html-table)))
       ;; we don't want a bevel for this table, but we don't want 
diff --git a/gnucash/report/stylesheets/stylesheet-head-or-tail.scm b/gnucash/report/stylesheets/stylesheet-head-or-tail.scm
index f6a279c404..c2cbfd4cc9 100644
--- a/gnucash/report/stylesheets/stylesheet-head-or-tail.scm
+++ b/gnucash/report/stylesheets/stylesheet-head-or-tail.scm
@@ -408,7 +408,7 @@
     (if (not links?)
 	  (gnc:html-document-set-style! ssdoc "a" 'tag ""))
 
-    (add-css-information-to-doc options ssdoc)
+    (add-css-information-to-doc options ssdoc doc)
 
     (let ((t (gnc:make-html-table)))
       ;; we don't want a bevel for this table, but we don't want
diff --git a/gnucash/report/stylesheets/stylesheet-plain.scm b/gnucash/report/stylesheets/stylesheet-plain.scm
index 511f00d595..2a9d7e3348 100644
--- a/gnucash/report/stylesheets/stylesheet-plain.scm
+++ b/gnucash/report/stylesheets/stylesheet-plain.scm
@@ -216,7 +216,7 @@
      ssdoc "a"
      'tag ""))
 
-    (add-css-information-to-doc options ssdoc)
+    (add-css-information-to-doc options ssdoc doc)
 
     (let* ((title (gnc:html-document-title doc))
            (doc-headline (gnc:html-document-headline doc))