summaryrefslogtreecommitdiffstats
path: root/macosx/tkMacOSXWm.c
diff options
context:
space:
mode:
authorcc_benny <cc_benny@noemail.net>2003-09-26 16:18:17 (GMT)
committercc_benny <cc_benny@noemail.net>2003-09-26 16:18:17 (GMT)
commit07132b67492096bc260c85895551efa73de230df (patch)
tree2d31a93d87784e880333d079ed9f5e06f32d4801 /macosx/tkMacOSXWm.c
parente136a5c360b92d167178ff98760213725076070c (diff)
downloadtk-07132b67492096bc260c85895551efa73de230df.zip
tk-07132b67492096bc260c85895551efa73de230df.tar.gz
tk-07132b67492096bc260c85895551efa73de230df.tar.bz2
* macosx/tkMacOSXWm.c (TkWmStackorderToplevelWrapperMap): Add
GetWindowFromPort() [Bug #812415]; make function static. FossilOrigin-Name: ddfdc1577b54dfa045f49a159b5f8c87e007ac85
Diffstat (limited to 'macosx/tkMacOSXWm.c')
-rw-r--r--macosx/tkMacOSXWm.c12
1 files changed, 7 insertions, 5 deletions
diff --git a/macosx/tkMacOSXWm.c b/macosx/tkMacOSXWm.c
index bad9c47..aa00e3a 100644
--- a/macosx/tkMacOSXWm.c
+++ b/macosx/tkMacOSXWm.c
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkMacOSXWm.c,v 1.7 2003/02/25 16:09:29 das Exp $
+ * RCS: @(#) $Id: tkMacOSXWm.c,v 1.7.2.1 2003/09/26 16:19:52 cc_benny Exp $
*/
#include <Carbon/Carbon.h>
@@ -72,6 +72,8 @@ static int ParseGeometry _ANSI_ARGS_((Tcl_Interp *interp,
char *string, TkWindow *winPtr));
static void TopLevelEventProc _ANSI_ARGS_((ClientData clientData,
XEvent *eventPtr));
+static void TkWmStackorderToplevelWrapperMap _ANSI_ARGS_((
+ TkWindow *winPtr, Tcl_HashTable *table));
static void TopLevelReqProc _ANSI_ARGS_((ClientData dummy,
Tk_Window tkwin));
static void UpdateGeometryInfo _ANSI_ARGS_((
@@ -5408,21 +5410,21 @@ TkpChangeFocus(winPtr, force)
*
*----------------------------------------------------------------------
*/
-void
+static void
TkWmStackorderToplevelWrapperMap(winPtr, table)
TkWindow *winPtr; /* TkWindow to recurse on */
Tcl_HashTable *table; /* Maps mac window to TkWindow */
{
TkWindow *childPtr;
Tcl_HashEntry *hPtr;
- void *wrapper;
+ WindowRef macWindow;
int newEntry;
if (Tk_IsMapped(winPtr) && Tk_IsTopLevel(winPtr)) {
- wrapper = (void *) TkMacOSXGetDrawablePort(winPtr->window);
+ macWindow = GetWindowFromPort(TkMacOSXGetDrawablePort(winPtr->window));
hPtr = Tcl_CreateHashEntry(table,
- (char *) wrapper, &newEntry);
+ (const char *) macWindow, &newEntry);
Tcl_SetHashValue(hPtr, winPtr);
}