diff options
author | wolfsuit <wolfsuit> | 2004-03-17 19:01:45 (GMT) |
---|---|---|
committer | wolfsuit <wolfsuit> | 2004-03-17 19:01:45 (GMT) |
commit | 64a51bdf01b7ffa1a184f1c8e32a4ccd00443c93 (patch) | |
tree | 48e9c91a3d0fb614426b0d0a68c276fe0f45243f /macosx/tkMacOSXMenus.c | |
parent | 16bfdf9ebd970a07cec78144b103dcbc9542d246 (diff) | |
download | tk-64a51bdf01b7ffa1a184f1c8e32a4ccd00443c93.zip tk-64a51bdf01b7ffa1a184f1c8e32a4ccd00443c93.tar.gz tk-64a51bdf01b7ffa1a184f1c8e32a4ccd00443c93.tar.bz2 |
Get the "Command-H" -> hide binding working. Also remove the spurious
Quit menu item from the File command.
Diffstat (limited to 'macosx/tkMacOSXMenus.c')
-rw-r--r-- | macosx/tkMacOSXMenus.c | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/macosx/tkMacOSXMenus.c b/macosx/tkMacOSXMenus.c index 6eed023..892ef8a 100644 --- a/macosx/tkMacOSXMenus.c +++ b/macosx/tkMacOSXMenus.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMacOSXMenus.c,v 1.2.2.1 2003/05/13 02:42:57 das Exp $ + * RCS: @(#) $Id: tkMacOSXMenus.c,v 1.2.2.2 2004/03/17 19:01:47 wolfsuit Exp $ */ #include "tk.h" @@ -189,9 +189,15 @@ TkMacOSXInitMenus( InsertMenu(tkFileMenu, 0); AppendMenu(tkFileMenu, "\pSourceÉ"); AppendMenu(tkFileMenu, "\pClose/W"); + + /* + * These don't belong in the File menu on Mac OS X. + */ + +#if 0 AppendMenu(tkFileMenu, "\p(-"); AppendMenu(tkFileMenu, "\pQuit/Q"); - +#endif if (TkMacOSXUseMenuID(kEditMenu) != TCL_OK) { panic("Menu ID %d is already in use!", kEditMenu); } |