Fix tests that fail during daylight savings time.
lol oops
This commit is contained in:
parent
1ef922f8f8
commit
288d2041e5
|
@ -26,7 +26,8 @@
|
|||
(define (make-date* year month day)
|
||||
(make-date 0 0 0 0 day month year 0))
|
||||
|
||||
(define %tzoffset (date-zone-offset (current-date)))
|
||||
(define %tzoffset
|
||||
(date-zone-offset (string->date "2015-09-05" "~Y~m~d")))
|
||||
|
||||
(test-equal "post-ref"
|
||||
'(hello test)
|
||||
|
|
|
@ -76,7 +76,8 @@
|
|||
(take-up-to 2 '(1 2 3)))
|
||||
|
||||
(test-equal "string->date*"
|
||||
(make-date 0 0 15 06 05 09 2015 (date-zone-offset (current-date)))
|
||||
(make-date 0 0 15 06 05 09 2015
|
||||
(date-zone-offset (string->date "2015-09-05" "~Y~m~d")))
|
||||
(string->date* "2015-09-05 06:15"))
|
||||
|
||||
(test-end)
|
||||
|
|
Loading…
Reference in New Issue