summaryrefslogtreecommitdiffstats
path: root/library/init.tcl
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-10-17 19:46:07 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-10-17 19:46:07 (GMT)
commita76f86e56510b6a36c85f5c22968aed705a26470 (patch)
tree15fccd566a59148f8335e0cdcc467aabc327483a /library/init.tcl
parent51448d41677600e1a03ebfc365a2638118af2dfe (diff)
parent4656afb575cda58ec7b6ce77f0a96b98173ca36d (diff)
downloadtcl-a76f86e56510b6a36c85f5c22968aed705a26470.zip
tcl-a76f86e56510b6a36c85f5c22968aed705a26470.tar.gz
tcl-a76f86e56510b6a36c85f5c22968aed705a26470.tar.bz2
Merge 8.7
Diffstat (limited to 'library/init.tcl')
-rw-r--r--library/init.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/init.tcl b/library/init.tcl
index d2e3624..2962dbd 100644
--- a/library/init.tcl
+++ b/library/init.tcl
@@ -450,7 +450,7 @@ proc auto_load_index {} {
continue
} else {
set error [catch {
- fconfigure $f -encoding utf-8 -eofchar "\032 {}"
+ fconfigure $f -encoding utf-8 -eofchar "\x1A {}"
set id [gets $f]
if {$id eq "# Tcl autoload index file, version 2.0"} {
eval [read $f]