Index: kitsh/buildsrc/kitsh-0.0/dir2c.tcl
==================================================================
--- kitsh/buildsrc/kitsh-0.0/dir2c.tcl
+++ kitsh/buildsrc/kitsh-0.0/dir2c.tcl
@@ -559,10 +559,18 @@
 puts ""
 
 puts "int Cvfs_data_${hashkey}_Init(Tcl_Interp *interp) {"
 puts "\tTcl_Command tclCreatComm_ret;"
 puts "\tint tclPkgProv_ret;"
+puts ""
+puts "#ifdef USE_TCL_STUBS"
+puts "\tif (!Tcl_InitStubs(interp, TCL_VERSION, 0)) {"
+puts "#else"
+puts "\tif (!Tcl_PkgRequire(interp, \"Tcl\", TCL_VERSION, 0)) {"
+puts "#endif /* USE_TCL_STUBS */"
+puts "\t\treturn(TCL_ERROR);"
+puts "\t}"
 puts ""
 puts "\ttclCreatComm_ret = Tcl_CreateObjCommand(interp, \"::vfs::cvfs::data::${hashkey}::getMetadata\", getMetadata, NULL, NULL);"
 puts "\tif (!tclCreatComm_ret) {"
 puts "\t\treturn(TCL_ERROR);"
 puts "\t}"