diff options
author | dgp <dgp@users.sourceforge.net> | 2005-04-15 15:50:30 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2005-04-15 15:50:30 (GMT) |
commit | 4b3cad67669ee24ba10a1b95e9f8c91747b1d11b (patch) | |
tree | e3981d6b87f905ae7756ea40db80ab94b983c5e0 /library/tclIndex | |
parent | f2ba23c5317d5946330c79c359b396664ede4bc9 (diff) | |
download | tcl-4b3cad67669ee24ba10a1b95e9f8c91747b1d11b.zip tcl-4b3cad67669ee24ba10a1b95e9f8c91747b1d11b.tar.gz tcl-4b3cad67669ee24ba10a1b95e9f8c91747b1d11b.tar.bz2 |
* library/init.tcl: Use auto-loading to bring in Tcl Module
* library/tclIndex: support as needed. This reduces startup
* library/tm.tcl: time by delaying this initialization to
a later time.
Diffstat (limited to 'library/tclIndex')
-rw-r--r-- | library/tclIndex | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/library/tclIndex b/library/tclIndex index 5d963a0..3a435d1 100644 --- a/library/tclIndex +++ b/library/tclIndex @@ -74,8 +74,14 @@ set auto_index(::safe::AliasLoad) [list source [file join $dir safe.tcl]] set auto_index(::safe::FileInAccessPath) [list source [file join $dir safe.tcl]] set auto_index(::safe::Subset) [list source [file join $dir safe.tcl]] set auto_index(::safe::AliasSubset) [list source [file join $dir safe.tcl]] +set auto_index(::safe::AliasEncoding) [list source [file join $dir safe.tcl]] set auto_index(tcl_wordBreakAfter) [list source [file join $dir word.tcl]] set auto_index(tcl_wordBreakBefore) [list source [file join $dir word.tcl]] set auto_index(tcl_endOfWord) [list source [file join $dir word.tcl]] set auto_index(tcl_startOfNextWord) [list source [file join $dir word.tcl]] set auto_index(tcl_startOfPreviousWord) [list source [file join $dir word.tcl]] +set auto_index(::tcl::tm::add) [list source [file join $dir tm.tcl]] +set auto_index(::tcl::tm::remove) [list source [file join $dir tm.tcl]] +set auto_index(::tcl::tm::list) [list source [file join $dir tm.tcl]] +set auto_index(::tcl::tm::UnknownHandler) [list source [file join $dir tm.tcl]] +set auto_index(::tcl::tm::roots) [list source [file join $dir tm.tcl]] |