diff options
author | welch <welch> | 1998-08-13 13:36:35 (GMT) |
---|---|---|
committer | welch <welch> | 1998-08-13 13:36:35 (GMT) |
commit | 9692243b6878042f296a1a7c52bbaa7ca34ac46c (patch) | |
tree | d734a8cef0d167aa136f5091dbdeeee6f0ba5589 /mac | |
parent | 202062d81bd2e42abb6303add95ef160f1c11e3b (diff) | |
download | tk-9692243b6878042f296a1a7c52bbaa7ca34ac46c.zip tk-9692243b6878042f296a1a7c52bbaa7ca34ac46c.tar.gz tk-9692243b6878042f296a1a7c52bbaa7ca34ac46c.tar.bz2 |
Updates from Jim Ingham
Diffstat (limited to 'mac')
-rw-r--r-- | mac/tkMacMenu.c | 27 |
1 files changed, 17 insertions, 10 deletions
diff --git a/mac/tkMacMenu.c b/mac/tkMacMenu.c index 51fc355..4f98a81 100644 --- a/mac/tkMacMenu.c +++ b/mac/tkMacMenu.c @@ -241,7 +241,7 @@ static void DrawTearoffEntry _ANSI_ARGS_((TkMenu *menuPtr, TkMenuEntry *mePtr, Drawable d, GC gc, Tk_Font tkfont, CONST Tk_FontMetrics *fmPtr, int x, int y, int width, int height)); -static void FixMDEF _ANSI_ARGS_((void)); +static Handle FixMDEF _ANSI_ARGS_((void)); static void GetMenuAccelGeometry _ANSI_ARGS_((TkMenu *menuPtr, TkMenuEntry *mePtr, Tk_Font tkfont, CONST Tk_FontMetrics *fmPtr, int *modWidthPtr, @@ -501,9 +501,8 @@ TkpNewMenu( macMenuHdl = NewMenu(menuID, itemText); #ifdef GENERATINGCFM { - Handle mdefProc = GetResource('MDEF', 591); - Handle sicnHandle = GetResource('SICN', SICN_RESOURCE_NUMBER); - if ((mdefProc != NULL) && (sicnHandle != NULL)) { + Handle mdefProc = FixMDEF(); + if ((mdefProc != NULL)) { (*macMenuHdl)->menuProc = mdefProc; } } @@ -3917,7 +3916,8 @@ TkMacClearMenubarActive(void) { if ((menuBarRefPtr != NULL) && (menuBarRefPtr->menuPtr != NULL)) { TkMenu *menuPtr; - for (menuPtr = menuBarRefPtr->menuPtr->masterMenuPtr; menuPtr != NULL; + for (menuPtr = menuBarRefPtr->menuPtr->masterMenuPtr; + menuPtr != NULL; menuPtr = menuPtr->nextInstancePtr) { if (menuPtr->menuType == MENUBAR) { RecursivelyClearActiveMenu(menuPtr); @@ -3975,15 +3975,15 @@ TkpMenuNotifyToplevelCreate( * figure it out. * * Results: - * None. + * Returns the MDEF handle. * * Side effects: - * Allcates a hash table. + * The MDEF is read in and massaged. * *---------------------------------------------------------------------- */ -static void +static Handle FixMDEF(void) { #ifdef GENERATINGCFM @@ -3991,10 +3991,17 @@ FixMDEF(void) Handle SICNHandle = GetResource('SICN', SICN_RESOURCE_NUMBER); if ((MDEFHandle != NULL) && (SICNHandle != NULL)) { HLock(MDEFHandle); - HLock(MDEFHandle); - menuDefProc = TkNewMenuDefProc(MenuDefProc); + HLock(SICNHandle); + if (menuDefProc == NULL) { + menuDefProc = TkNewMenuDefProc(MenuDefProc); + } memmove((void *) (((long) (*MDEFHandle)) + 0x24), &menuDefProc, 4); + return MDEFHandle; + } else { + return NULL; } +#else + return NULL; #endif } |