From 6b5c2c3d0bddf37b4046f36bb01aa80c34cf0cc8 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Wed, 28 Sep 2016 23:23:22 +0900 Subject: [PATCH] struct tm year is offset by 1900 --- lib/chibi/time.sld | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/chibi/time.sld b/lib/chibi/time.sld index aad8cc21..526795e3 100644 --- a/lib/chibi/time.sld +++ b/lib/chibi/time.sld @@ -33,7 +33,7 @@ (define time-hour date-hour) (define time-day date-day) (define time-month date-month) - (define time-year date-year) + (define (time-year x) (- (date-year x) 1900)) (define time-day-of-week date-week-day) (define time-day-of-year date-year-day) (define (seconds->time seconds)