taxtxf: schemify

8 years ago · 22517f98ce
parent 41322ec3d8
commit 22517f98ce
1 changed files with 3 additions and 6 deletions
--- a/gnucash/report/locale-specific/us/taxtxf.scm
+++ b/gnucash/report/locale-specific/us/taxtxf.scm
@ -3184,12 +3184,9 @@
                           from-date
                           to-date
                           tax-year
-                           (if (gnc:txf-get-tax-entity-type-description
-                                       (string->symbol tax-entity-type))
-                               (gnc:txf-get-tax-entity-type-description
-                                       (string->symbol tax-entity-type))
-                               "None specified"
-                           )
+                           (or (gnc:txf-get-tax-entity-type-description
+                                (string->symbol tax-entity-type))
+                               "None specified")
                     )))))

             (if (not (null? txf-invalid-alist))