diff options
| author | das <das> | 2007-10-17 18:20:59 (GMT) |
|---|---|---|
| committer | das <das> | 2007-10-17 18:20:59 (GMT) |
| commit | 5faf7ade19c640eec93f4a683775153498d865bc (patch) | |
| tree | 8391a9162a304ea6a34a157dca60eab39f44adb4 /macosx/tkMacOSXWm.c | |
| parent | f485e73c0baf43e706eb0b598a28a8c07f01d296 (diff) | |
| download | tk-5faf7ade19c640eec93f4a683775153498d865bc.zip tk-5faf7ade19c640eec93f4a683775153498d865bc.tar.gz tk-5faf7ade19c640eec93f4a683775153498d865bc.tar.bz2 | |
* macosx/tkMacOSXWm.c: fix warnings.
Diffstat (limited to 'macosx/tkMacOSXWm.c')
| -rw-r--r-- | macosx/tkMacOSXWm.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/macosx/tkMacOSXWm.c b/macosx/tkMacOSXWm.c index 5166b17..152f5cb 100644 --- a/macosx/tkMacOSXWm.c +++ b/macosx/tkMacOSXWm.c @@ -13,7 +13,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.58 2007/10/15 20:52:47 hobbs Exp $ + * RCS: @(#) $Id: tkMacOSXWm.c,v 1.59 2007/10/17 18:20:59 das Exp $ */ #include "tkMacOSXPrivate.h" @@ -1377,13 +1377,13 @@ WmForgetCmd(tkwin, winPtr, interp, objc, objv) int objc; /* Number of arguments. */ Tcl_Obj *CONST objv[]; /* Argument objects. */ { - register Tk_Window frameWin = (Tk_Window)winPtr; - char *oldClass = (char*)Tk_Class(frameWin); - #if 1 Tcl_AppendResult(interp, "wm forget is not yet supported", (char*)NULL); return TCL_ERROR; #else + register Tk_Window frameWin = (Tk_Window)winPtr; + char *oldClass = (char*)Tk_Class(frameWin); + if (Tk_IsTopLevel(frameWin)) { MacDrawable *macWin = (MacDrawable *) winPtr->window; CGrafPtr destPort = TkMacOSXGetDrawablePort(winPtr->window); @@ -2131,14 +2131,14 @@ WmManageCmd( int objc, /* Number of arguments. */ Tcl_Obj *CONST objv[]) /* Argument objects. */ { - register Tk_Window frameWin = (Tk_Window)winPtr; - register WmInfo *wmPtr = winPtr->wmInfoPtr; - char *oldClass = (char*)Tk_Class(frameWin); - #if 1 Tcl_AppendResult(interp, "wm manage is not yet supported", (char*)NULL); return TCL_ERROR; #else + register Tk_Window frameWin = (Tk_Window)winPtr; + register WmInfo *wmPtr = winPtr->wmInfoPtr; + char *oldClass = (char*)Tk_Class(frameWin); + if (!Tk_IsTopLevel(frameWin)) { MacDrawable *macWin = (MacDrawable *) winPtr->window; |