diff options
| author | dgp <dgp@users.sourceforge.net> | 2008-04-01 16:30:51 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2008-04-01 16:30:51 (GMT) |
| commit | 5e7c4d9bce04c5fbf22ab66e1459a1660ff57e25 (patch) | |
| tree | add0631b057edf9490c467e2c9847231e0c5379e /generic/tkConsole.c | |
| parent | 05d2b1f699928197cd82a59538c4b55d22f2df7c (diff) | |
| download | tk-5e7c4d9bce04c5fbf22ab66e1459a1660ff57e25.zip tk-5e7c4d9bce04c5fbf22ab66e1459a1660ff57e25.tar.gz tk-5e7c4d9bce04c5fbf22ab66e1459a1660ff57e25.tar.bz2 | |
* README: Bump version number to 8.6a0
* generic/tk.h:
* library/tk.tcl:
* macosx/Wish-Common.xcconfig:
* unix/configure.in:
* unix/tk.spec:
* win/README:
* win/configure.in:
* win/tcl.m4:
* unix/configure: autoconf-2.59
* win/configure:
* generic/tkConsole.c: Relax Tcl_InitStubs() calls so that a Tk 8.6
* generic/tkMain.c: might [load] into a Tcl 8.5 interp.
* generic/tkWindow.c:
* generic/tkStubLib.c: Update to compatibility with a libtcl.so
that contains no "tclStubsPtr" [Tcl Bug 1819422].
* generic/tkDecls.h: make genstubs
* generic/tkIntDecls.h:
* generic/tkIntPlatDecls.h:
* generic/tkIntXlibDecls.h:
* generic/tkPlatDecls.h:
Diffstat (limited to 'generic/tkConsole.c')
| -rw-r--r-- | generic/tkConsole.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkConsole.c b/generic/tkConsole.c index 4b0f6b8..0ea2051 100644 --- a/generic/tkConsole.c +++ b/generic/tkConsole.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkConsole.c,v 1.35 2007/12/13 15:24:14 dgp Exp $ + * RCS: @(#) $Id: tkConsole.c,v 1.36 2008/04/01 16:30:52 dgp Exp $ */ #include "tk.h" @@ -229,11 +229,11 @@ Tk_InitConsoleChannels( Tcl_Channel consoleChannel; /* - * Ensure that we are getting the matching version of Tcl. This is really + * Ensure that we are getting a compatible version of Tcl. This is really * only an issue when Tk is loaded dynamically. */ - if (Tcl_InitStubs(interp, TCL_VERSION, 1) == NULL) { + if (Tcl_InitStubs(interp, TCL_VERSION, 0) == NULL) { return; } |