diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-17 16:45:47 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-17 16:45:47 (GMT) |
| commit | ae243c85b7e7b470ea541cce41e76cd2cd7474f6 (patch) | |
| tree | a5bce13e421f0a68acf9592afe02fc79c73c785e /library | |
| parent | cb291b4c47b87c9080c820a1b28c381167a5fa74 (diff) | |
| parent | 27c27e941a08c8ea873a5de4333a498788a22c33 (diff) | |
| download | tcl-ae243c85b7e7b470ea541cce41e76cd2cd7474f6.zip tcl-ae243c85b7e7b470ea541cce41e76cd2cd7474f6.tar.gz tcl-ae243c85b7e7b470ea541cce41e76cd2cd7474f6.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'library')
| -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 8e4b657..49dfdbe 100644 --- a/library/clock.tcl +++ b/library/clock.tcl @@ -3452,7 +3452,7 @@ proc ::tcl::clock::ReadZoneinfoFile {fileName fname} { set times [linsert $times 0 $MINWIDE] set codes {} foreach c $tempCodes { - lappend codes [expr { $c & 0xff }] + lappend codes [expr { $c & 0xFF }] } set codes [linsert $codes 0 0] |