diff options
| author | sebres <sebres@users.sourceforge.net> | 2024-10-31 12:30:02 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2024-10-31 12:30:02 (GMT) |
| commit | 60067b5ae6fb7d8a714a99eac67432f2807df910 (patch) | |
| tree | 9baa1de7cd4db46ca9effa6279bcadd0df9a6651 | |
| parent | cbc72bac2db3e0484edd9f156f7d487faccd3777 (diff) | |
| download | tcl-60067b5ae6fb7d8a714a99eac67432f2807df910.zip tcl-60067b5ae6fb7d8a714a99eac67432f2807df910.tar.gz tcl-60067b5ae6fb7d8a714a99eac67432f2807df910.tar.bz2 | |
typo (zone name in errorcode)
| -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 d65d9af..bf69789 100644 --- a/library/clock.tcl +++ b/library/clock.tcl @@ -3416,7 +3416,7 @@ proc ::tcl::clock::LoadTimeZoneFile { fileName } { if { [regexp {^[/\\]|^[a-zA-Z]+:|(?:^|[/\\])\.\.} $fileName] } { return -code error \ - -errorcode [list CLOCK badTimeZone $:fileName] \ + -errorcode [list CLOCK badTimeZone :$fileName] \ "time zone \":$fileName\" not valid" } if { [catch { |