diff --git a/src/report/standard-reports/balance-sheet.scm b/src/report/standard-reports/balance-sheet.scm index a7e9efa804..312e3da00e 100644 --- a/src/report/standard-reports/balance-sheet.scm +++ b/src/report/standard-reports/balance-sheet.scm @@ -158,7 +158,7 @@ (add-option (gnc:make-string-option gnc:pagename-general optname-party-name - "b" opthelp-party-name (gnc:company-info gnc:*company-name*))) + "b" opthelp-party-name (or (gnc:company-info gnc:*company-name*) ""))) ;; date at which to report balance (gnc:options-add-report-date! diff --git a/src/report/standard-reports/budget-balance-sheet.scm b/src/report/standard-reports/budget-balance-sheet.scm index 4b2f5cdcbd..f4ddfbe504 100644 --- a/src/report/standard-reports/budget-balance-sheet.scm +++ b/src/report/standard-reports/budget-balance-sheet.scm @@ -126,7 +126,7 @@ (add-option (gnc:make-string-option gnc:pagename-general optname-party-name - "b" opthelp-party-name (gnc:company-info gnc:*company-name*))) + "b" opthelp-party-name (or (gnc:company-info gnc:*company-name*) ""))) (add-option (gnc:make-simple-boolean-option diff --git a/src/report/standard-reports/budget-income-statement.scm b/src/report/standard-reports/budget-income-statement.scm index 0dfe20d183..534a5fc606 100644 --- a/src/report/standard-reports/budget-income-statement.scm +++ b/src/report/standard-reports/budget-income-statement.scm @@ -147,7 +147,7 @@ (add-option (gnc:make-string-option gnc:pagename-general optname-party-name - "b" opthelp-party-name (gnc:company-info gnc:*company-name*))) + "b" opthelp-party-name (or (gnc:company-info gnc:*company-name*) ""))) (add-option (gnc:make-budget-option diff --git a/src/report/standard-reports/equity-statement.scm b/src/report/standard-reports/equity-statement.scm index 3fa57413e2..bbbbd000ec 100644 --- a/src/report/standard-reports/equity-statement.scm +++ b/src/report/standard-reports/equity-statement.scm @@ -111,7 +111,7 @@ (add-option (gnc:make-string-option (N_ "General") optname-party-name - "b" opthelp-party-name (gnc:company-info gnc:*company-name*))) + "b" opthelp-party-name (or (gnc:company-info gnc:*company-name*) ""))) ;; date at which to report balance (gnc:options-add-date-interval! diff --git a/src/report/standard-reports/income-statement.scm b/src/report/standard-reports/income-statement.scm index 0a029ed291..ea5f25ba05 100644 --- a/src/report/standard-reports/income-statement.scm +++ b/src/report/standard-reports/income-statement.scm @@ -151,7 +151,7 @@ (add-option (gnc:make-string-option gnc:pagename-general optname-party-name - "b" opthelp-party-name (gnc:company-info gnc:*company-name*))) + "b" opthelp-party-name (or (gnc:company-info gnc:*company-name*) ""))) ;; period over which to report income (gnc:options-add-date-interval! diff --git a/src/report/standard-reports/trial-balance.scm b/src/report/standard-reports/trial-balance.scm index bcadab8929..55beb22610 100644 --- a/src/report/standard-reports/trial-balance.scm +++ b/src/report/standard-reports/trial-balance.scm @@ -149,7 +149,7 @@ (add-option (gnc:make-string-option (N_ "General") optname-party-name - "b" opthelp-party-name (gnc:company-info gnc:*company-name*))) + "b" opthelp-party-name (or (gnc:company-info gnc:*company-name*) ""))) ;; the period over which to collect adjusting/closing entries and ;; date at which to report the balance