[Gnucash-changes] Fix division by zero error in tax report

Christian Stimming cstim at cvs.gnucash.org
Fri Dec 3 15:26:34 EST 2004


Log Message:
-----------
Fix division by zero error in tax report

Tags:
----
gnucash-1-8-branch

Modified Files:
--------------
    gnucash/src/report/locale-specific/us:
        taxtxf.scm

Revision Data
-------------
Index: taxtxf.scm
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/src/report/locale-specific/us/taxtxf.scm,v
retrieving revision 1.16.2.1
retrieving revision 1.16.2.2
diff -Lsrc/report/locale-specific/us/taxtxf.scm -Lsrc/report/locale-specific/us/taxtxf.scm -u -r1.16.2.1 -r1.16.2.2
--- src/report/locale-specific/us/taxtxf.scm
+++ src/report/locale-specific/us/taxtxf.scm
@@ -632,7 +632,9 @@
                    (gnc:account-get-type account) #f)))
 
 	(set! work-done (+ 1 work-done))
-	(gnc:report-percent-done (* 100 (/ work-done work-to-do)))
+	(gnc:report-percent-done (* 100 (if (> work-to-do 0)
+					    (/ work-done work-to-do)
+					    1)))
         (if (gnc:account-is-inc-exp? account)
             (let* ((children (gnc:account-get-children account))
                    (to-special #f)	; clear special-splits-period


More information about the gnucash-changes mailing list