From d4dbd97ad15d53a6054acec61e4e3ce9d2101875 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Sat, 4 May 2024 16:12:42 +0000 Subject: [unknown] only calls shell command in interactive tclsh sessions --- doc/unknown.n | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/doc/unknown.n b/doc/unknown.n index 82dcefc..408ebc1 100644 --- a/doc/unknown.n +++ b/doc/unknown.n @@ -47,7 +47,7 @@ The default implementation of \fBunknown\fR behaves as follows. It first calls the \fBauto_load\fR library procedure to load the command. If this succeeds, then it executes the original command with its original arguments. -If the auto-load fails then \fBunknown\fR calls \fBauto_execok\fR +If the auto-load fails and Tcl is run interactively then \fBunknown\fR calls \fBauto_execok\fR to see if there is an executable file by the name \fIcmd\fR. If so, it invokes the Tcl \fBexec\fR command with \fIcmd\fR and all the \fIargs\fR as arguments. -- cgit v0.12 From 3d35f4695d0702a37574c901fa535ff6d9a4a25f Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Sat, 4 May 2024 16:17:32 +0000 Subject: Fix [a5f4a7aed8] - tcl::tm::path auto_index entry --- library/tclIndex | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/library/tclIndex b/library/tclIndex index 9784265..88a7bc0 100644 --- a/library/tclIndex +++ b/library/tclIndex @@ -67,7 +67,7 @@ set auto_index(::safe::AliasExeName) [list source -encoding utf-8 [file join $di set auto_index(::safe::RejectExcessColons) [list source -encoding utf-8 [file join $dir safe.tcl]] set auto_index(::safe::VarName) [list source -encoding utf-8 [file join $dir safe.tcl]] set auto_index(::safe::Setup) [list source -encoding utf-8 [file join $dir safe.tcl]] -set auto_index(::tcl::tmpath) [list source -encoding utf-8 [file join $dir tm.tcl]] +set auto_index(::tcl::tm::path) [list source -encoding utf-8 [file join $dir tm.tcl]] set auto_index(::tcl::tm::add) [list source -encoding utf-8 [file join $dir tm.tcl]] set auto_index(::tcl::tm::remove) [list source -encoding utf-8 [file join $dir tm.tcl]] set auto_index(::tcl::tm::list) [list source -encoding utf-8 [file join $dir tm.tcl]] -- cgit v0.12