From a847d441f14cf66255a8e52f6447b43d9aac447c Mon Sep 17 00:00:00 2001 From: christopherlam Date: Wed, 20 Dec 2017 11:57:35 +0800 Subject: [PATCH] fix silly mistake --- src/app-utils/test/test-date-utilities.scm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/app-utils/test/test-date-utilities.scm b/src/app-utils/test/test-date-utilities.scm index e62610f1b2..6fca517300 100644 --- a/src/app-utils/test/test-date-utilities.scm +++ b/src/app-utils/test/test-date-utilities.scm @@ -7,12 +7,12 @@ (define (create-time64 l) (let ((now (gnc-localtime (current-time)))) - (set-tm:sec now (list-ref l 0)) - (set-tm:min now (list-ref l 1)) - (set-tm:hour now (list-ref l 2)) - (set-tm:mday now (list-ref l 3)) - (set-tm:mon now (list-ref l 4)) - (set-tm:year now (list-ref l 5)) + (set-tm:sec now (list-ref l 5)) + (set-tm:min now (list-ref l 4)) + (set-tm:hour now (list-ref l 3)) + (set-tm:mday now (list-ref l 2)) + (set-tm:mon now (list-ref l 1)) + (set-tm:year now (list-ref l 0)) (set-tm:isdst now -1) (gnc-mktime now)))