Correction to GormClassManager.m

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/gorm/trunk@19057 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Gregory John Casamento 2004-04-07 00:20:08 +00:00
parent 03adac38a7
commit 3a1401773c
2 changed files with 23 additions and 6 deletions

View file

@ -1,3 +1,10 @@
2004-04-06 20:16 Gregory John Casamento <greg_casamento@yahoo.com>
* GormClassManager.m: Correction to how actions are added to
FirstResponder. Previously it was adding *all* actions to this
entry, but it shouldn't do this. It now adds only those
methods added to subclasses of NSResponder.
2004-04-06 00:16 Gregory John Casamento <greg_casamento@yahoo.com>
* Palettes/2Controls/inspectors.m: added defaultItemForm attribute.

View file

@ -179,7 +179,10 @@
// copy all actions from the class imported to the first responder
while((action = [e nextObject]))
{
[self addAction: action forClassNamed: @"FirstResponder"];
if([self isSuperclass: @"NSResponder" linkedToClass: className])
{
[self addAction: action forClassNamed: @"FirstResponder"];
}
}
result = YES;
@ -242,7 +245,10 @@
[[info objectForKey: @"AllActions"] insertObject: anAction atIndex: 0];
if(![className isEqualToString: @"FirstResponder"])
{
[self addAction: anAction forClassNamed: @"FirstResponder"];
if([self isSuperclass: @"NSResponder" linkedToClass: className])
{
[self addAction: anAction forClassNamed: @"FirstResponder"];
}
}
}
@ -305,7 +311,10 @@
}
if(![className isEqualToString: @"FirstResponder"])
{
[self replaceAction: oldAction withAction: newAction forClassNamed: @"FirstResponder"];
if([self isSuperclass: @"NSResponder" linkedToClass: className])
{
[self replaceAction: oldAction withAction: newAction forClassNamed: @"FirstResponder"];
}
}
}
@ -879,7 +888,10 @@
}
if(![className isEqualToString: @"FirstResponder"])
{
[self removeAction: anAction fromClassNamed: @"FirstResponder"];
if([self isSuperclass: @"NSResponder" linkedToClass: className])
{
[self removeAction: anAction fromClassNamed: @"FirstResponder"];
}
}
}
@ -1261,8 +1273,6 @@
{
NSString *ssclass;
//NSDebugLog(@"isSuperClass : %@, %@", superclass, subclass);
if (superclass == nil || subclass == nil)
{
return NO;