Making it impossible to subclass the pseudoclass FirstResponder

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/gorm/trunk@16789 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Gregory John Casamento 2003-05-26 00:40:57 +00:00
parent 194f1b0d9e
commit 323114eb4e
2 changed files with 28 additions and 14 deletions

View file

@ -1,9 +1,14 @@
2003-05-24 Gregory John Casamento <greg_casamento@yahoo.com>
* GormDocument.m: Prevent subclassing of FirstResponder.
2003-05-24 Gregory John Casamento <greg_casamento@yahoo.com>
* GormInspectorsManager.m: Made changes to revert inspector to
"empty" when a document is closed.
* GormClassManager.m: Prevent user from adding methods to FirstResponder.
FirstResponder now automatically adds all action methods to it's action.
* GormClassManager.m: Prevent user from adding methods to
FirstResponder. FirstResponder now automatically adds all
action methods to it's action.
* GormDocument.m: Corrected a problem which was allowing the user to
instantiate FirstResponder.
* Gorm.m: Cleaned up some places where I was using (Gorm *) and should
@ -24,10 +29,11 @@
2003-05-24 Fabien Vallon <fabien@tuxfamily.org>
* Gorm.m : refactored newApplication, newEmpty, newPalettes,newInspector.
new method : newGormDocument
* Gorm.m : refactored newApplication, newEmpty, newPalettes,
newInspector. new method : newGormDocument
Add inteligent window placement (cascade)
* Gorm.gorm : add tags for newApplication, newEmpty, newPalettes,newInspector
* Gorm.gorm : add tags for newApplication, newEmpty, newPalettes,
newInspector
2003-05-22 Gregory John Casamento <greg_casamento@yahoo.com>

View file

@ -668,15 +668,23 @@ static NSImage *classesImage = nil;
NSString *newClassName;
id itemSelected = [classesView itemAtRow: i];
newClassName = [classManager addClassWithSuperClassName:
itemSelected];
RETAIN(newClassName);
[classesView reloadData];
[classesView expandItem: itemSelected];
i = [classesView rowForItem: newClassName];
[classesView selectRow: i byExtendingSelection: NO];
[classesView scrollRowToVisible: i];
[self editClass: self];
if(![itemSelected isEqualToString: @"FirstResponder"])
{
newClassName = [classManager addClassWithSuperClassName:
itemSelected];
RETAIN(newClassName);
[classesView reloadData];
[classesView expandItem: itemSelected];
i = [classesView rowForItem: newClassName];
[classesView selectRow: i byExtendingSelection: NO];
[classesView scrollRowToVisible: i];
[self editClass: self];
}
else
{
// beep to inform the user of this error.
NSBeep();
}
}
return self;