diff options
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tltcl/lib/tcl8.6/init.tcl')
-rw-r--r-- | systems/texlive/tlnet/tlpkg/tltcl/lib/tcl8.6/init.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tltcl/lib/tcl8.6/init.tcl b/systems/texlive/tlnet/tlpkg/tltcl/lib/tcl8.6/init.tcl index 1bfca4c6da..edf6bd58d0 100644 --- a/systems/texlive/tlnet/tlpkg/tltcl/lib/tcl8.6/init.tcl +++ b/systems/texlive/tlnet/tlpkg/tltcl/lib/tcl8.6/init.tcl @@ -16,7 +16,7 @@ if {[info commands package] == ""} { error "version mismatch: library\nscripts expect Tcl version 7.5b1 or later but the loaded version is\nonly [info patchlevel]" } -package require -exact Tcl 8.6.11 +package require -exact Tcl 8.6.12 # Compute the auto path to use in this interpreter. # The values on the path come from several locations: @@ -494,7 +494,7 @@ proc auto_load_index {} { continue } else { set error [catch { - fconfigure $f -eofchar \032 + fconfigure $f -eofchar "\032 {}" set id [gets $f] if {$id eq "# Tcl autoload index file, version 2.0"} { eval [read $f] @@ -643,7 +643,7 @@ proc auto_execok name { } set auto_execs($name) "" - set shellBuiltins [list assoc cls copy date del dir echo erase ftype \ + set shellBuiltins [list assoc cls copy date del dir echo erase exit ftype \ md mkdir mklink move rd ren rename rmdir start time type ver vol] if {[info exists env(PATHEXT)]} { # Add an initial ; to have the {} extension check first. |