diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2011-03-14 21:34:45 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2011-03-14 21:34:45 (GMT) |
| commit | 7823c12b0d9f47e460337e6518e854fb35b90213 (patch) | |
| tree | 4c0861eab88dff02db40e925372bb9d47d54bdff /tools/tclZIC.tcl | |
| parent | 1cc2772e7a4d0bc429fa4b63c4dc50eaf4992963 (diff) | |
| parent | 842d7c2f42cb8a46aafada1fd0add90c2a43df12 (diff) | |
| download | tcl-7823c12b0d9f47e460337e6518e854fb35b90213.zip tcl-7823c12b0d9f47e460337e6518e854fb35b90213.tar.gz tcl-7823c12b0d9f47e460337e6518e854fb35b90213.tar.bz2 | |
Import Olson's tzdata2011d and fix a tclZIC.tcl bug that made the import fail.
* tools/tclZIC.tcl (onDayOfMonth): Allow for leading zeroes
in month and day so that tzdata2011d parses correctly.
* library/tzdata/America/Havana:
* library/tzdata/America/Juneau:
* library/tzdata/America/Santiago:
* library/tzdata/Europe/Istanbul:
* library/tzdata/Pacific/Apia:
* library/tzdata/Pacific/Easter:
* library/tzdata/Pacific/Honolulu: tzdata2011d
Diffstat (limited to 'tools/tclZIC.tcl')
| -rwxr-xr-x | tools/tclZIC.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tools/tclZIC.tcl b/tools/tclZIC.tcl index 0b352b1..005919a 100755 --- a/tools/tclZIC.tcl +++ b/tools/tclZIC.tcl @@ -394,6 +394,9 @@ proc parseON {on} { #---------------------------------------------------------------------- proc onDayOfMonth {day year month} { + scan $day %d day + scan $year %d year + scan $month %d month set date [::tcl::clock::GetJulianDayFromEraYearMonthDay \ [dict create era CE year $year month $month dayOfMonth $day] \ 2361222] |