diff -Naur itk4.0.0_orig/generic/itkBase.c itk4.0.0/generic/itkBase.c
--- itk4.0.0_orig/generic/itkBase.c	2013-02-03 08:25:51.000000000 -0800
+++ itk4.0.0/generic/itkBase.c	2013-11-07 14:18:15.711783872 -0800
@@ -231,6 +231,8 @@
      *  end-of-the-line?
      */
 
+    Tcl_PkgProvideEx(interp, "Itk", ITK_PATCH_LEVEL,
+            (ClientData) &itkStubs);
     return Tcl_PkgProvideEx(interp, "itk", ITK_PATCH_LEVEL,
             (ClientData) &itkStubs);
 }
diff -Naur itk4.0.0_orig/pkgIndex.tcl.in itk4.0.0/pkgIndex.tcl.in
--- itk4.0.0_orig/pkgIndex.tcl.in	2013-02-03 08:25:51.000000000 -0800
+++ itk4.0.0/pkgIndex.tcl.in	2013-11-07 14:16:18.585957142 -0800
@@ -1,3 +1,4 @@
 # Tcl package index file, version 1.0
 
 package ifneeded itk @PACKAGE_VERSION@ [list load [file join $dir "@PKG_LIB_FILE@"] itk]
+package ifneeded Itk @PACKAGE_VERSION@ [list load [file join $dir "@PKG_LIB_FILE@"] itk]