Index: Wrapping/vtkWrapTclInit.c
===================================================================
RCS file: /cvsroot/VTK/VTK/Wrapping/vtkWrapTclInit.c,v
retrieving revision 1.14
diff -u -r1.14 vtkWrapTclInit.c
--- Wrapping/vtkWrapTclInit.c	6 Nov 2003 14:06:47 -0000	1.14
+++ Wrapping/vtkWrapTclInit.c	22 Nov 2004 16:34:10 -0000
@@ -112,6 +112,23 @@
   
   fprintf(fout,"\n\nint VTK_EXPORT %s_Init(Tcl_Interp *interp)\n{\n",
           kitName);
+  
+  /* for stubs enabled vtk libraries... */
+  fprintf(fout,"\n  #ifdef USE_TCL_STUBS\n"
+          "    if (Tcl_InitStubs(interp, \"8.1\", 0) == NULL) {\n"
+          "      return TCL_ERROR;\n"
+          "    }\n"
+          "  #endif\n");
+
+  if (!strcmp(kitName,"Vtkrenderingtcl"))
+    {
+    fprintf(fout,"\n  #ifdef USE_TK_STUBS\n"
+          "    if (Tk_InitStubs(interp, \"8.1\", 0) == NULL) {\n"
+          "      return TCL_ERROR;\n"
+          "    }\n"
+          "  #endif\n\n");
+    }
+          
   if (!strcmp(kitName,"Vtkcommontcl"))
     {
     fprintf(fout,