Index: pkgIndex.tcl.in
--- pkgIndex.tcl.in.orig
+++ pkgIndex.tcl.in
@@ -23,7 +23,7 @@ if {![package vsatisfies [package provide Tcl] 8.4]} {
 # about a thread-disabled interp, instead of the message
 # "can't find package Thread".
 
-package ifneeded Thread @PACKAGE_VERSION@ [list load [file join $dir @PKG_LIB_FILE@] [string totitle @PACKAGE_NAME@]]
+package ifneeded Thread @PACKAGE_VERSION@ [list load [file join $dir .. .. @PKG_LIB_FILE@] Thread]
 
 # package Ttrace uses some support machinery.
 
