diff --git a/src/business/business-reports/fancy-invoice.scm b/src/business/business-reports/fancy-invoice.scm
index 3f292a0be8..d8ed7e0a02 100644
--- a/src/business/business-reports/fancy-invoice.scm
+++ b/src/business/business-reports/fancy-invoice.scm
@@ -843,8 +843,8 @@
 		  (set! date-table (make-date-table))
 		  ;; oli-custom - moved invoice number here
 		  (gnc:html-table-append-row!
-		   date-table (sprintf #f (_ "Invoice # %d")
-				       (gnc:invoice-get-id invoice)))
+		   date-table (list (sprintf #f (_ "Invoice # %d")
+                                             (gnc:invoice-get-id invoice))))
 		  (make-date-row! date-table (_ "Invoice Date") post-date)
 		  (make-date-row! date-table (_ "Due Date") due-date)
 		  date-table)
diff --git a/src/report/report-system/html-table.scm b/src/report/report-system/html-table.scm
index 49df619429..3ed3028b11 100644
--- a/src/report/report-system/html-table.scm
+++ b/src/report/report-system/html-table.scm
@@ -349,7 +349,9 @@
   (let* ((dd (gnc:html-table-data table))
 	 (current-num-rows (gnc:html-table-num-rows table))
 	 (new-num-rows (+ current-num-rows 1)))
-    (set! dd (cons newrow dd))
+    (if (list? newrow)
+        (set! dd (cons newrow dd))
+        (set! dd (cons (list newrow) dd)))
     (gnc:html-table-set-num-rows-internal! 
      table 
      new-num-rows)