diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 12:35:47 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 12:35:47 (GMT) |
commit | edc8f4f5a979ccc03265007043d077ac570eb4db (patch) | |
tree | dd0f31f1179bca6a2d1f0fd551e69bd279fdd9d2 /library | |
parent | a57835e07ae4443feed31888c2fdb0e44b2748e0 (diff) | |
parent | 4afe34c9b3d9bc56352470e7f7dc61304bb71201 (diff) | |
download | tcl-edc8f4f5a979ccc03265007043d077ac570eb4db.zip tcl-edc8f4f5a979ccc03265007043d077ac570eb4db.tar.gz tcl-edc8f4f5a979ccc03265007043d077ac570eb4db.tar.bz2 |
Fix [34538ba43f]
Diffstat (limited to 'library')
-rw-r--r-- | library/clock.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/clock.tcl b/library/clock.tcl index 0696c47..166c377 100644 --- a/library/clock.tcl +++ b/library/clock.tcl @@ -3861,7 +3861,7 @@ proc ::tcl::clock::ProcessPosixTimeZone { z } { # Put DST in effect in all years from 1916 to 2099. - for { set y 1916 } { $y < 2099 } { incr y } { + for { set y 1916 } { $y < 2100 } { incr y } { set startTime [DeterminePosixDSTTime $z start $y] incr startTime [expr { - wide($stdOffset) }] set endTime [DeterminePosixDSTTime $z end $y] |