gnucash maint: [invoice.scm] Use full header for initial screen

Christopher Lam clam at code.gnucash.org
Thu Oct 1 11:53:36 EDT 2020


Updated	 via  https://github.com/Gnucash/gnucash/commit/23de9588 (commit)
	from  https://github.com/Gnucash/gnucash/commit/6eb2e36c (commit)



commit 23de958872a51080a72c75a9a63c0171e877d2c4
Author: Christopher Lam <christopher.lck at gmail.com>
Date:   Thu Oct 1 23:49:09 2020 +0800

    [invoice.scm] Use full header for initial screen
    
    instead of a single-line error line

diff --git a/gnucash/report/reports/standard/invoice.scm b/gnucash/report/reports/standard/invoice.scm
index ce31b615a..959a243e0 100644
--- a/gnucash/report/reports/standard/invoice.scm
+++ b/gnucash/report/reports/standard/invoice.scm
@@ -769,9 +769,13 @@ for styling the invoice. Please see the exported report for the CSS class names.
          (custom-title (opt-val gnc:pagename-general "Custom Title")))
 
     (if (null? invoice)
-        (gnc:html-document-add-object! document
-                                       (gnc:make-html-text
-                                        (G_ "No valid invoice selected. Click on the Options button and select the invoice to use.")))
+
+        (gnc:html-document-add-object!
+         document
+         (gnc:html-make-generic-warning
+          (G_ "Invoice") (gnc:report-id report-obj) ""
+          (G_ "No valid invoice selected. Click on the Options button and select the invoice to use.")))
+
         (let* ((book (gncInvoiceGetBook invoice))
                (owner (gncInvoiceGetOwner invoice))
                (type (gncInvoiceGetType invoice))



Summary of changes:
 gnucash/report/reports/standard/invoice.scm | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)



More information about the gnucash-changes mailing list