Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Fix [34538ba43f] |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
535c915c7956c607b7f68896911df16d |
User & Date: | jan.nijtmans 2013-06-27 12:35:47 |
References
2013-06-27
| ||
12:41 | • Pending ticket [34538ba43f]: tests/clock.test fails with boundary year 2099 plus 4 other changes artifact: a3b4a0d777 user: jan.nijtmans | |
Context
2013-07-02
| ||
07:17 | Bug [32afa6e256]: dirent64 check is incorrect in tcl.m4. Thanks to Brian Griffin. check-in: a3ae798ed1 user: jan.nijtmans tags: trunk | |
06:43 | Better (hopefully) fix for Tk bug 1712098, which elimin... Closed-Leaf check-in: e2f236a273 user: jan.nijtmans tags: bug-1712098 | |
2013-06-28
| ||
13:16 | merge trunk check-in: 85728857dc user: dgp tags: dgp-refactor | |
12:31 | Tk bug 1712098 check-in: 15475c0ad5 user: jan.nijtmans tags: bug-1712098 | |
2013-06-27
| ||
13:12 | merge trunk check-in: c499bee30f user: dgp tags: dgp-tcs-rewrite | |
12:35 | Fix [34538ba43f] check-in: 535c915c79 user: jan.nijtmans tags: trunk | |
12:34 | Fix [34538ba43f] check-in: 01ae5c884c user: jan.nijtmans tags: core-8-5-branch | |
08:51 | Bug [9b2e636361]: Tcl_CreateInterp() needs initialized encodings. check-in: 6189063c4d user: jan.nijtmans tags: trunk | |
Changes
Changes to library/clock.tcl.
︙ | ︙ | |||
3857 3858 3859 3860 3861 3862 3863 | dict set z endDayOfWeek 0 dict set z endMinutes 0 dict set z endSeconds 0 } # Put DST in effect in all years from 1916 to 2099. | | | 3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871 | dict set z endDayOfWeek 0 dict set z endMinutes 0 dict set z endSeconds 0 } # Put DST in effect in all years from 1916 to 2099. 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] incr endTime [expr { - wide($dstOffset) }] if { $startTime < $endTime } { lappend data \ [list $startTime $dstOffset 1 $dstName] \ |
︙ | ︙ |