Guard against divide-by-zero errors.

2025-02-25 18:55:30 -06:00 · 2018-08-27 18:00:55 -07:00
parent 4e88b8cb6c
commit fe73f52bdb
2 changed files with 14 additions and 11 deletions
--- a/libgnucash/engine/test/test-extras.scm
+++ b/libgnucash/engine/test/test-extras.scm
@@ -203,10 +203,11 @@
        (begin
          (xaccSplitSetMemo split-1 memo)
          (xaccSplitSetMemo split-2 memo)))
+    (if (> amount2 0)
    (gnc-pricedb-create (xaccAccountGetCommodity debit)
                        (xaccAccountGetCommodity credit)
                        (gnc-dmy2time64 DD MM YY)
-                        (/ amount1 amount2))
+                        (/ amount1 amount2)))
    (xaccTransCommitEdit txn)
    txn))