diff options
| author | jingham <jingham@noemail.net> | 2000-02-10 08:53:05 (GMT) |
|---|---|---|
| committer | jingham <jingham@noemail.net> | 2000-02-10 08:53:05 (GMT) |
| commit | f195f8e412ce3f86979e96e3bbaec21ee5d63c64 (patch) | |
| tree | 21b220e7ac86ad13179df4f981925f81d287544e /mac | |
| parent | 04d59007aa554b84ba8610f6b0d636ae67840e3a (diff) | |
| download | tk-f195f8e412ce3f86979e96e3bbaec21ee5d63c64.zip tk-f195f8e412ce3f86979e96e3bbaec21ee5d63c64.tar.gz tk-f195f8e412ce3f86979e96e3bbaec21ee5d63c64.tar.bz2 | |
Add support for Appearance Manager 1.2 Floating windows, and the new window classes in unsupported1
FossilOrigin-Name: 60c069c95bdec88c3f471f4c60ca2d53a6d47837
Diffstat (limited to 'mac')
| -rw-r--r-- | mac/tkMacAppInit.c | 6 | ||||
| -rw-r--r-- | mac/tkMacClipboard.c | 4 |
2 files changed, 7 insertions, 3 deletions
diff --git a/mac/tkMacAppInit.c b/mac/tkMacAppInit.c index 9772f36..670e8fa 100644 --- a/mac/tkMacAppInit.c +++ b/mac/tkMacAppInit.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMacAppInit.c,v 1.11 1999/06/16 05:33:58 jingham Exp $ + * RCS: @(#) $Id: tkMacAppInit.c,v 1.12 2000/02/10 08:53:06 jingham Exp $ */ #include <Gestalt.h> @@ -250,7 +250,11 @@ MacintoshInit() InitGraf(&tcl_macQdPtr->thePort); InitFonts(); + if (TkMacHaveAppearance() >= 0x110) { + InitFloatingWindows(); + } else { InitWindows(); + } InitMenus(); InitDialogs((long) NULL); InitCursor(); diff --git a/mac/tkMacClipboard.c b/mac/tkMacClipboard.c index 011a89c..c565392 100644 --- a/mac/tkMacClipboard.c +++ b/mac/tkMacClipboard.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: tkMacClipboard.c,v 1.5 2000/01/06 02:22:36 hobbs Exp $ + * RCS: @(#) $Id: tkMacClipboard.c,v 1.6 2000/02/10 08:53:11 jingham Exp $ */ #include "tkInt.h" @@ -74,7 +74,7 @@ TkSelGetSelection( Tcl_ExternalToUtfDString(NULL, *handle, length, &encodedText); result = (*proc)(clientData, interp, - Tcl_DStringValue(encodedText)); + Tcl_DStringValue(&encodedText)); Tcl_DStringFree(&encodedText); HUnlock(handle); |