[sc-dev] SF.net SVN: supercollider:[8263] trunk/Source/app/GUIPrimitives.M

[mullmusik@xxxxxxxxxxxxxxxxxxxxx]

Revision: 8263
          http://supercollider.svn.sourceforge.net/supercollider/?rev=8263&view=rev
Author:   mullmusik
Date:     2008-12-23 17:40:47 +0000 (Tue, 23 Dec 2008)

Log Message:
-----------
Reworked wrongtype stuff in menu add

Modified Paths:
--------------
    trunk/Source/app/GUIPrimitives.M

Modified: trunk/Source/app/GUIPrimitives.M
===================================================================
--- trunk/Source/app/GUIPrimitives.M	2008-12-23 15:29:13 UTC (rev 8262)
+++ trunk/Source/app/GUIPrimitives.M	2008-12-23 17:40:47 UTC (rev 8263)
@@ -3724,17 +3724,20 @@
 		if (err) return err;
 		if (strcmp(parentSymbol->name, "Help")==0) {
 			parentMenu = [[[NSApp mainMenu] itemWithTitle:@"Help"] submenu];
-		}
+		} 
 	} else if (isKindOfSlot(parentObj, getsym("CocoaMenuItem")->u.classobj)){
 		SCNSMenuItem *parentItem = (SCNSMenuItem*)(parentObj->uo->slots->uptr);
 		if([parentItem hasSubmenu]) {
 			//NSLog(@"Parent has submenu");
 			parentMenu = [parentItem submenu];
-		} else {
-			return errFailed;
 		}
-	} else return errWrongType;
+	} 
 	
+	if(!parentMenu) {
+		[label release];
+		return errWrongType;
+	}
+	
 	// protect against bad indices
 	int parentSize = [parentMenu numberOfItems];
 	//NSLog(@"parentSize: %i", parentSize);


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

_______________________________________________
sc-dev mailing list

info (subscription, etc.): http://www.beast.bham.ac.uk/research/sc_mailing_lists.shtml
archive: https://listarc.bham.ac.uk/marchives/sc-dev/
search: https://listarc.bham.ac.uk/lists/sc-dev/search/