--- expect-5.43/exp_main_tk.c 2008-10-17 16:51:32.000000000 -0700 +++ expect-5.43/exp_main_tk.c.new 2008-10-17 18:04:14.000000000 -0700 @@ -369,7 +369,7 @@ goto done; } } - if (Tcl_PkgRequire(interp, "Tcl", TCL_VERSION, 1) == NULL) { + if (Tcl_PkgRequire(interp, "Tcl", TCL_VERSION, 0) == NULL) { code = TCL_ERROR; goto done; }