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 | eec0dcb53009191ddf6086200bfd7a83f16f788e (patch) | |
tree | dd0f31f1179bca6a2d1f0fd551e69bd279fdd9d2 /library | |
parent | e592a6c9d5c134df1436e59d6f8ccdbcac741f73 (diff) | |
parent | c0f408b9cdcf0f36547818df0f766c8f90fdbce8 (diff) | |
download | tcl-eec0dcb53009191ddf6086200bfd7a83f16f788e.zip tcl-eec0dcb53009191ddf6086200bfd7a83f16f788e.tar.gz tcl-eec0dcb53009191ddf6086200bfd7a83f16f788e.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] |