From 0bb972cd0206791932bf5ad4dff871aa6f1788ff Mon Sep 17 00:00:00 2001 From: christopherlam Date: Tue, 1 Aug 2017 19:34:46 +0800 Subject: [PATCH] Fix income statement when trading accounts not used Fix cosmetic bug http://gnucash.1415818.n4.nabble.com/unknown-column-in-Income-Statement-Profit-amp-Loss-td4680661.html#a4692940 Insert empty-cell instead of #unspecified result of (if predicate? result-if-true) where predicate? is #false --- src/report/standard-reports/income-statement.scm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/report/standard-reports/income-statement.scm b/src/report/standard-reports/income-statement.scm index 5b2c352827..da4579f335 100644 --- a/src/report/standard-reports/income-statement.scm +++ b/src/report/standard-reports/income-statement.scm @@ -647,14 +647,16 @@ (if standard-order? (list (gnc:make-html-table-cell inc-table) - (if (not (null? trading-accounts)) + (if (null? trading-accounts) + (gnc:html-make-empty-cell) (gnc:make-html-table-cell tra-table)) (gnc:make-html-table-cell exp-table) ) (list (gnc:make-html-table-cell exp-table) (gnc:make-html-table-cell inc-table) - (if (not (null? trading-accounts)) + (if (null? trading-accounts) + (gnc:html-make-empty-cell) (gnc:make-html-table-cell tra-table)) ) )