From 72c7001693f0cc8f06ffd1138abb3a0db967329d Mon Sep 17 00:00:00 2001 From: Geert Janssens Date: Sun, 2 Jun 2013 10:32:18 +0000 Subject: [PATCH] Log a warning if a test shows more than 100% progress. Author: Peter Broadbery git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@23025 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/report/report-system/report-utilities.scm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/report/report-system/report-utilities.scm b/src/report/report-system/report-utilities.scm index 0274b3392e..1d5b86cba0 100644 --- a/src/report/report-system/report-utilities.scm +++ b/src/report/report-system/report-utilities.scm @@ -700,6 +700,8 @@ 0)) (define (gnc:report-percent-done percent) + (if (> percent 100) + (gnc:warn "report more than 100% finished. " percent)) (gnc-window-show-progress "" percent)) (define (gnc:report-finished)