diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 12:34:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 12:34:49 (GMT) |
| commit | c0f408b9cdcf0f36547818df0f766c8f90fdbce8 (patch) | |
| tree | 685251da0d97d5487e3bf77d9a76a2b9aae3d6a1 /library/clock.tcl | |
| parent | 5ea3e8b5702435745c062fa9219fbd2dc590c4b4 (diff) | |
| download | tcl-c0f408b9cdcf0f36547818df0f766c8f90fdbce8.zip tcl-c0f408b9cdcf0f36547818df0f766c8f90fdbce8.tar.gz tcl-c0f408b9cdcf0f36547818df0f766c8f90fdbce8.tar.bz2 | |
Fix [34538ba43f]
Diffstat (limited to 'library/clock.tcl')
| -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 32911b3..49aad23 100644 --- a/library/clock.tcl +++ b/library/clock.tcl @@ -3947,7 +3947,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] |