mirror of
https://github.com/python/cpython.git
synced 2025-12-04 08:34:25 +00:00
Patch by Dieter Maurer to make things work for Tcl/Tk 8.1 (tested with
8.1.1). His approach doesn't work with Tcl/Tk 8.2, so I've placed it inside #if TKMAJORMINOR == 8001 and #endif. See also his patch for tkappinit.c.
This commit is contained in:
parent
f941acda60
commit
6b26a06037
1 changed files with 4 additions and 0 deletions
|
|
@ -491,6 +491,10 @@ Tkapp_New(screenName, baseName, className, interactive)
|
|||
|
||||
v->interp = Tcl_CreateInterp();
|
||||
|
||||
#if TKMAJORMINOR == 8001
|
||||
TclpInitLibraryPath(baseName);
|
||||
#endif /* TKMAJORMINOR */
|
||||
|
||||
#if defined(macintosh) && TKMAJORMINOR >= 8000
|
||||
/* This seems to be needed since Tk 8.0 */
|
||||
ClearMenuBar();
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue