[view-column] don't emit raw html, include captured-error

This commit is contained in:
Christopher Lam 2019-11-03 10:42:36 +08:00
parent d56a47f17a
commit 3f6c8478a4

View File

@ -138,9 +138,9 @@
(gnc:html-table-cell-append-objects! (gnc:html-table-cell-append-objects!
contents-cell contents-cell
(gnc:make-html-text (gnc:make-html-text
(string-append (gnc:html-markup-h3 (_ "Report error"))
"<h3>" (_ "Report error") "</h3><p>" (_ "An error occurred while running the report.")
(_ "An error occurred while running the report."))))) (gnc:html-markup "pre" gnc:last-captured-error))))
;; increment the alloc number for each occupied row ;; increment the alloc number for each occupied row
(let loop ((row current-row-num)) (let loop ((row current-row-num))