diff options
| -rw-r--r-- | library/history.tcl | 2 | ||||
| -rw-r--r-- | library/tclIndex | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/library/history.tcl b/library/history.tcl index 5dd6b06..e3d3fe4 100644 --- a/library/history.tcl +++ b/library/history.tcl @@ -53,7 +53,7 @@ proc ::history {args} { } # Tricky stuff needed to make stack and errors come out right! - tailcall apply {arglist {tailcall history {*}$arglist} ::tcl} $args + tailcall apply {arglist {tailcall ::tcl::history {*}$arglist} ::tcl} $args } # (unnamed) -- diff --git a/library/tclIndex b/library/tclIndex index 8fd5a89..3be8994 100644 --- a/library/tclIndex +++ b/library/tclIndex @@ -21,6 +21,7 @@ set auto_index(::auto_mkindex_parser::commandInit) [list ::tcl::Pkg::source [fil set auto_index(::auto_mkindex_parser::fullname) [list ::tcl::Pkg::source [file join $dir auto.tcl]] set auto_index(foreachLine) [list ::tcl::Pkg::source [file join $dir foreachline.tcl]] set auto_index(history) [list ::tcl::Pkg::source [file join $dir history.tcl]] +set auto_index(::tcl::history) [list ::tcl::Pkg::source [file join $dir history.tcl]] set auto_index(::tcl::HistAdd) [list ::tcl::Pkg::source [file join $dir history.tcl]] set auto_index(::tcl::HistKeep) [list ::tcl::Pkg::source [file join $dir history.tcl]] set auto_index(::tcl::HistClear) [list ::tcl::Pkg::source [file join $dir history.tcl]] |