summaryrefslogtreecommitdiffstats
path: root/tools/tclZIC.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'tools/tclZIC.tcl')
-rwxr-xr-xtools/tclZIC.tcl11
1 files changed, 5 insertions, 6 deletions
diff --git a/tools/tclZIC.tcl b/tools/tclZIC.tcl
index 5595264..9253686 100755
--- a/tools/tclZIC.tcl
+++ b/tools/tclZIC.tcl
@@ -29,7 +29,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: tclZIC.tcl,v 1.6 2005/11/28 15:37:20 kennykb Exp $
+# RCS: @(#) $Id: tclZIC.tcl,v 1.7 2005/11/28 16:28:04 kennykb Exp $
#
#----------------------------------------------------------------------
@@ -44,10 +44,6 @@ set olsonFiles {
pacificnew southamerica systemv
}
-# Temporary scaffolding - load up the new 'clock' package.
-
-source [file join [file dirname [info script]] .. library clock.tcl]
-
# Define the year at which the DST information will stop.
set maxyear 2100
@@ -56,7 +52,7 @@ set maxyear 2100
set MAXWIDE [expr {wide(1)}]
while 1 {
- set next [expr {$MAXWIDE + $MAXWIDE + 1}]
+ set next [expr {wide($MAXWIDE + $MAXWIDE + 1)}]
if {$next < 0} {
break
}
@@ -1335,6 +1331,9 @@ proc writeLinks {outDir} {
#
#----------------------------------------------------------------------
+puts "Compiling time zones -- [clock format [clock seconds] \
+ -format {%x %X} -locale system]"
+
# Determine directories
lassign $argv inDir outDir