summaryrefslogtreecommitdiffstats
path: root/tools
diff options
context:
space:
mode:
authorKevin B Kenny <kennykb@acm.org>2011-03-14 21:34:45 (GMT)
committerKevin B Kenny <kennykb@acm.org>2011-03-14 21:34:45 (GMT)
commita207870d30b45dbaf343cfc5e6f9ef7e23cee423 (patch)
tree4c0861eab88dff02db40e925372bb9d47d54bdff /tools
parent5120c16e64a97c1c3737f4e2aba7fa99127314e9 (diff)
parent8de1e1fbccf76d8a4a83722faaac940f23cd299c (diff)
downloadtcl-a207870d30b45dbaf343cfc5e6f9ef7e23cee423.zip
tcl-a207870d30b45dbaf343cfc5e6f9ef7e23cee423.tar.gz
tcl-a207870d30b45dbaf343cfc5e6f9ef7e23cee423.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')
-rwxr-xr-xtools/tclZIC.tcl3
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]