diff options
-rw-r--r-- | library/tm.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/tm.tcl b/library/tm.tcl index 90692d2..baf3667 100644 --- a/library/tm.tcl +++ b/library/tm.tcl @@ -321,7 +321,7 @@ proc ::tcl::tm::Defaults {} { set sep ":" } for {set n $minor} {$n >= 0} {incr n -1} { - foreach ev [list \ + foreach ev [::list \ TCL${major}.${n}_TM_PATH \ TCL${major}_${n}_TM_PATH \ ] { |