[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!
contents-cell
(gnc:make-html-text
(string-append
"<h3>" (_ "Report error") "</h3><p>"
(_ "An error occurred while running the report.")))))
(gnc:html-markup-h3 (_ "Report error"))
(_ "An error occurred while running the report.")
(gnc:html-markup "pre" gnc:last-captured-error))))
;; increment the alloc number for each occupied row
(let loop ((row current-row-num))