mirror of
https://git.FreeBSD.org/ports.git
synced 2025-01-03 06:04:53 +00:00
25 lines
822 B
C
25 lines
822 B
C
--- generic/bltInit.c.orig 2013-11-19 09:31:51.000000000 +0100
|
|
+++ generic/bltInit.c 2013-11-19 09:31:51.000000000 +0100
|
|
@@ -510,7 +510,6 @@
|
|
Tcl_Interp *interp; /* Interpreter to add extra commands */
|
|
{
|
|
int flags;
|
|
- int dostub = 0;
|
|
|
|
flags = (int)Tcl_GetAssocData(interp, BLT_THREAD_KEY, NULL);
|
|
if ((flags & BLT_TCL_CMDS) == 0) {
|
|
@@ -562,11 +561,11 @@
|
|
Blt_RegisterArrayObj(interp);
|
|
bltNaN = MakeNaN();
|
|
#ifdef USE_BLT_STUBS
|
|
- if (Tcl_PkgProvideEx(interp, "BLT", BLT_PATCH_LEVEL, &bltStubs) != TCL_OK) {
|
|
+ if (Tcl_PkgProvideEx(interp, "BLT", BLT_VERSION, &bltStubs) != TCL_OK) {
|
|
return TCL_ERROR;
|
|
}
|
|
#else
|
|
- if (Tcl_PkgProvideEx(interp, "BLT", BLT_PATCH_LEVEL, NULL) != TCL_OK) {
|
|
+ if (Tcl_PkgProvideEx(interp, "BLT", BLT_VERSION, NULL) != TCL_OK) {
|
|
return TCL_ERROR;
|
|
}
|
|
#endif
|