diff --git a/ChangeLog b/ChangeLog index a8a321d6eb..941587517a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2001-03-22 Robert Graham Merkel + + * src/scm/date-utilities.scm (moddate): set is-dst to unknown to + hopefully fix daylight-saving time errors. + 2001-03-21 Dave Peticolas * configure.in: take out --enable-gpg argument, is run-time dep diff --git a/src/scm/date-utilities.scm b/src/scm/date-utilities.scm index e86a71d9a1..5e0d142df3 100644 --- a/src/scm/date-utilities.scm +++ b/src/scm/date-utilities.scm @@ -144,7 +144,7 @@ (set-tm:mday newtm (op (tm:mday newtm) (tm:mday delta))) (set-tm:mon newtm (op (tm:mon newtm) (tm:mon delta))) (set-tm:year newtm (op (tm:year newtm) (tm:year delta))) - + (set-tm:isdst newtm -1) (let ((time (car (mktime newtm)))) (cons time 0)))))