Update of /cvsroot/scopeapp/scopeapp/src
In directory usw-pr-cvs1:/tmp/cvs-serv4372
Modified Files:
ScopeAppDelegate.m
Log Message:
Added simplest of menus.
Index: ScopeAppDelegate.m
===================================================================
RCS file: /cvsroot/scopeapp/scopeapp/src/ScopeAppDelegate.m,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** ScopeAppDelegate.m 29 Jul 2002 09:40:38 -0000 1.9
--- ScopeAppDelegate.m 31 Jul 2002 09:23:21 -0000 1.10
***************
*** 37,40 ****
--- 37,42 ----
id sampler;
+ [self createMenu];
+
// FIXME choose an appropriate InputSampler
sampler = [[TestSampler alloc] init];
***************
*** 60,63 ****
--- 62,77 ----
{
return YES; // FIXME change after adding support for reading from files ?
+ }
+
+ - (void) createMenu
+ {
+ NSMenu* menu;
+ menu = [[NSMenu new] autorelease];
+
+ [menu addItemWithTitle: @"Quit"
+ action: @selector (terminate:)
+ keyEquivalent: @"q"];
+
+ [NSApp setMainMenu: menu];
}
|