diff --git a/gnucash/report/html-utilities.scm b/gnucash/report/html-utilities.scm
index a801111e10f..d5bda78a315 100644
--- a/gnucash/report/html-utilities.scm
+++ b/gnucash/report/html-utilities.scm
@@ -228,13 +228,10 @@
(define (gnc:html-make-generic-simple-warning report-title-string message)
- (let ((p (gnc:make-html-text)))
- (gnc:html-text-append!
- p
- (gnc:html-markup-h2 (string-append report-title-string ":"))
- (gnc:html-markup-h2 "")
- (gnc:html-markup-p message))
- p))
+ (gnc:make-html-text
+ (gnc:html-markup-h3 (string-append report-title-string ":"))
+ (gnc:html-markup-h3 "")
+ (gnc:html-markup-p message)))
(define (gnc:html-make-options-link report-id)
@@ -301,14 +298,11 @@
(define (gnc:html-make-generic-warning
report-title-string report-id
warning-title-string warning-string)
- (let ((p (gnc:make-html-text)))
- (gnc:html-text-append!
- p
- (gnc:html-markup-h2 (string-append (G_ report-title-string) ":"))
- (gnc:html-markup-h2 warning-title-string)
- (gnc:html-markup-p warning-string)
- (gnc:html-make-options-link report-id))
- p))
+ (gnc:make-html-text
+ (gnc:html-markup-h3 (string-append (G_ report-title-string) ":"))
+ (gnc:html-markup-h3 warning-title-string)
+ (gnc:html-markup-p warning-string)
+ (gnc:html-make-options-link report-id)))
(define (gnc:html-make-generic-options-warning
report-title-string report-id)
diff --git a/gnucash/report/reports/example/welcome-to-gnucash.scm b/gnucash/report/reports/example/welcome-to-gnucash.scm
index 6675312ae58..80a2e076876 100644
--- a/gnucash/report/reports/example/welcome-to-gnucash.scm
+++ b/gnucash/report/reports/example/welcome-to-gnucash.scm
@@ -37,7 +37,7 @@
(gnc:html-document-add-object!
doc
(gnc:make-html-text
- (gnc:html-markup-h2
+ (gnc:html-markup-h3
(format #f (G_ "Welcome to GnuCash ~a !")
gnc:version))
(gnc:html-markup-p
diff --git a/gnucash/report/reports/standard/new-owner-report.scm b/gnucash/report/reports/standard/new-owner-report.scm
index 8e0cbcad339..b64c4b02be8 100644
--- a/gnucash/report/reports/standard/new-owner-report.scm
+++ b/gnucash/report/reports/standard/new-owner-report.scm
@@ -1079,7 +1079,7 @@ invoices and amounts.")))))
(gnc:html-document-add-object!
document
(gnc:make-html-text
- (gnc:html-markup-h2 (G_ "No transactions found."))
+ (gnc:html-markup-h3 (G_ "No transactions found."))
(gnc:html-markup-p (G_ "No matching transactions found"))
(gnc:html-make-options-link (gnc:report-id report-obj)))))
diff --git a/gnucash/report/reports/standard/price-scatter.scm b/gnucash/report/reports/standard/price-scatter.scm
index a10e7f13055..787bd1333f3 100644
--- a/gnucash/report/reports/standard/price-scatter.scm
+++ b/gnucash/report/reports/standard/price-scatter.scm
@@ -192,7 +192,7 @@
(gnc:html-document-add-object!
document
(gnc:make-html-text
- (gnc:html-markup-h2 title)
+ (gnc:html-markup-h3 title)
(gnc:html-markup-p text))))
(gnc:html-chart-set-type! chart 'line)