summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
Diffstat (limited to 'generic')
-rw-r--r--generic/tkCmds.c7
-rw-r--r--generic/tkMain.c2
-rw-r--r--generic/tkWindow.c2
3 files changed, 3 insertions, 8 deletions
diff --git a/generic/tkCmds.c b/generic/tkCmds.c
index 09c1d67..a655341 100644
--- a/generic/tkCmds.c
+++ b/generic/tkCmds.c
@@ -23,12 +23,7 @@
#endif
#if (TCL_MAJOR_VERSION==8) && (TCL_MINOR_VERSION<6)
-# if defined(STATIC_BUILD)
-# define Tcl_Canceled(interp, flags) (TCL_OK)
-# else
-# define Tcl_Canceled \
- (tclStubsPtr->tclCanceled) /* 581 */
-# endif
+# define Tcl_Canceled(interp, flags) (TCL_OK)
#endif
/*
diff --git a/generic/tkMain.c b/generic/tkMain.c
index cb1fb5e..8bebb3d 100644
--- a/generic/tkMain.c
+++ b/generic/tkMain.c
@@ -135,7 +135,7 @@ Tk_MainEx(
* Ensure that we are getting a compatible version of Tcl.
*/
- if (Tcl_InitStubs(interp, "8.5.0", 0) == NULL) {
+ if (Tcl_InitStubs(interp, TCL_VERSION ".0", 0) == NULL) {
if (Tcl_InitStubs(interp, "8.1", 0) == NULL) {
abort();
} else {
diff --git a/generic/tkWindow.c b/generic/tkWindow.c
index 2901256..d40e7de 100644
--- a/generic/tkWindow.c
+++ b/generic/tkWindow.c
@@ -3024,7 +3024,7 @@ Initialize(
* Ensure that we are getting a compatible version of Tcl.
*/
- if (Tcl_InitStubs(interp, "8.5.0", 0) == NULL) {
+ if (Tcl_InitStubs(interp, TCL_VERSION ".0", 0) == NULL) {
return TCL_ERROR;
}