diff options
| author | jingham <jingham> | 2000-02-10 08:55:18 (GMT) |
|---|---|---|
| committer | jingham <jingham> | 2000-02-10 08:55:18 (GMT) |
| commit | 824761dbcda694ee8ba6b108a373eb3c2aec026f (patch) | |
| tree | f43637344ebdd7b323a38445d97180d1e32e880d /mac/tkMacSubwindows.c | |
| parent | e082656eda18c1458feedf3392c25a00f88b92ef (diff) | |
| download | tk-824761dbcda694ee8ba6b108a373eb3c2aec026f.zip tk-824761dbcda694ee8ba6b108a373eb3c2aec026f.tar.gz tk-824761dbcda694ee8ba6b108a373eb3c2aec026f.tar.bz2 | |
Add support for Appearance Manager 1.2 Floating windows, and the new window classes in unsupported1
Diffstat (limited to 'mac/tkMacSubwindows.c')
| -rw-r--r-- | mac/tkMacSubwindows.c | 16 |
1 files changed, 14 insertions, 2 deletions
diff --git a/mac/tkMacSubwindows.c b/mac/tkMacSubwindows.c index 09bf09b..23942f9 100644 --- a/mac/tkMacSubwindows.c +++ b/mac/tkMacSubwindows.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMacSubwindows.c,v 1.5 1999/04/16 01:51:32 stanton Exp $ + * RCS: @(#) $Id: tkMacSubwindows.c,v 1.6 2000/02/10 08:56:24 jingham Exp $ */ #include "tkInt.h" @@ -938,7 +938,15 @@ TkMacGetDrawablePort( } if (resultPort == NULL) { - panic("TkMacGetDrawablePort couldn't find container"); + /* + * FIXME: + * + * So far as I can tell, the only time that this happens is when + * we are tearing down an embedded child interpreter, and most + * of the time, this is harmless... However, we really need to + * find why the embedding loses. + */ + DebugStr("\pTkMacGetDrawablePort couldn't find container"); return NULL; } @@ -1075,10 +1083,14 @@ tkMacMoveWindow( { int xOffset, yOffset; + if (TkMacHaveAppearance() >= 0x110) { + MoveWindowStructure((WindowRef) window, (short) x, (short) y); + } else { TkMacWindowOffset(window, &xOffset, &yOffset); MoveWindow((WindowRef) window, (short) (x + xOffset), (short) (y + yOffset), false); } +} /* *---------------------------------------------------------------------- |