1 diff a/bindings/tcl/tclrrd.c b/bindings/tcl/tclrrd.c
2 --- a/bindings/tcl/tclrrd.c
3 +++ b/bindings/tcl/tclrrd.c
4 @@ -678,7 +678,7 @@ static int init(
5 if (Tcl_InitStubs(interp, TCL_VERSION, 0) == NULL)
6 return TCL_ERROR;
8 - if (Tcl_PkgRequire(interp, "Tcl", TCL_VERSION, 1) == NULL) {
9 + if (Tcl_PkgRequire(interp, "Tcl", TCL_VERSION, 0) == NULL) {
10 return TCL_ERROR;
11 }