Readded missing method.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/gorm/trunk@19867 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Gregory John Casamento 2004-08-12 02:33:17 +00:00
parent d5135b4e24
commit 0855692228
3 changed files with 29 additions and 0 deletions

View file

@ -1,3 +1,7 @@
2004-08-11 22:41 Gregory John Casamento <greg_casamento@yahoo.com>
* GormDocument.[hm]: Added back isTopLevelObject:.
2004-08-11 07:18 Gregory John Casamento <greg_casamento@yahoo.com>
* GormDocument.m: Removed the delegate and data source

View file

@ -151,6 +151,7 @@
- (BOOL) removeConnectionsForClassNamed: (NSString *)name;
- (BOOL) renameConnectionsForClassNamed: (NSString *)name
toName: (NSString *)newName;
- (BOOL) isTopLevelObject: (id)obj;
- (void) closeAllEditors;
// class loading

View file

@ -3521,6 +3521,30 @@ static NSImage *fileImage = nil;
nameTable];
}
- (BOOL) isTopLevelObject: (id)obj
{
BOOL result = NO;
if ([obj isKindOfClass: [NSMenu class]] == YES)
{
if ([self objectForName: @"NSMenu"] == obj)
{
result = YES;
}
}
else if ([obj isKindOfClass: [NSWindow class]] == YES)
{
result = YES;
}
else if ([obj isKindOfClass: [GSNibItem class]] == YES &&
[obj isKindOfClass: [GormCustomView class]] == NO)
{
result = YES;
}
return result;
}
- (id) firstResponder
{
return firstResponder;