gnucash master: Revert "Fix query period in test-account-get-trans-type-splits-interval."

John Ralls jralls at code.gnucash.org
Fri Mar 24 12:05:09 EDT 2017


Updated	 via  https://github.com/Gnucash/gnucash/commit/cd07876a (commit)
	from  https://github.com/Gnucash/gnucash/commit/539ef528 (commit)



commit cd07876a68277358278241e93927e893fc5d17d8
Author: John Ralls <jralls at ceridwen.us>
Date:   Thu Mar 23 17:09:18 2017 -0700

    Revert "Fix query period in test-account-get-trans-type-splits-interval."
    
    This reverts commit e66dd12aa91e60ba33b436dfc3e109fe0736b438. Because
    the test only seems to fail crossing a DST boundary.

diff --git a/src/report/report-system/test/test-report-utilities.scm b/src/report/report-system/test/test-report-utilities.scm
index 4bce98c..d6d26ac 100644
--- a/src/report/report-system/test/test-report-utilities.scm
+++ b/src/report/report-system/test/test-report-utilities.scm
@@ -27,8 +27,7 @@
          (start-date-tp (NDayDelta end-date-tp 10))
          (q-end-date-tp (gnc-dmy2timespec-end test-day test-month test-year))
          (q-start-date-tp (gnc-dmy2timespec test-day test-month test-year))
-;; Queries 5 days because start time is 00:00:00 and end time is 23:59:59.
-         (q-start-date-tp (NDayDelta q-start-date-tp 4)))
+         (q-start-date-tp (NDayDelta q-start-date-tp 5)))
 
     (let* ((accounts (env-create-account-structure-alist env (list "Assets"
 								   (list (cons 'type ACCT-TYPE-ASSET))
@@ -43,9 +42,4 @@
 							      ACCT-TYPE-ASSET
 							      q-start-date-tp q-end-date-tp)))
 	;; 10 is the right number (5 days, two splits per tx)
-	(if (and (equal? 10 (length splits))) #t
-            (begin
-              (format #t "~a~a~a~a~%" "Creation Start: " (strftime "%F %T" (localtime (car start-date-tp))) " Creation End: " (strftime "%F %T" (localtime (car end-date-tp))))
-              (format #t "~a~a~a~a~%" "Query Start: " (strftime "%F %T" (localtime (car q-start-date-tp))) " Query End: " (strftime "%F %T" (localtime (car q-end-date-tp))))
-              (format #t "~a~a~%" "Incorrect number of splits " (length splits))
-              #f))))))
+	(and (equal? 10 (length splits)))))))



Summary of changes:
 src/report/report-system/test/test-report-utilities.scm | 10 ++--------
 1 file changed, 2 insertions(+), 8 deletions(-)



More information about the gnucash-changes mailing list