Further bugfixes and improvements.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/gorm/trunk@17517 72102866-910b-0410-8b05-ffd578937521

ChangeLog

@@ -1,3 +1,9 @@
+2003-08-23  Gregory John Casamento <greg_casamento@yahoo.com>
+
+	* GormDocument.[hm]: Made selectClassWithObject public.
+	* GormInspectorManager.m: Added logic to call selectClassWithObject
+	so that when an object is selected, the classes view focuses on it.
+	
 2003-08-22  Gregory John Casamento <greg_casamento@yahoo.com>
 
 	* GormClassManager.m: Removed extraneous release calls.  In most

GormDocument.h

@@ -145,6 +145,7 @@
 - (id) remove: (id)sender;
 - (id) createClassFiles: (id)sender;
 - (id) instantiateClass: (id)sender;
+- (void) selectClassWithObject: (id)obj;
 
 // sound & image support
 - (id) openSound: (id)sender;

GormDocument.m

@@ -399,10 +399,16 @@ static NSImage	*classesImage = nil;
     }
 }
 
-- (void) _selectClassWithObject: (id)obj 
+- (void) selectClassWithObject: (id)obj 
 {
-  if ([obj respondsToSelector: @selector(className)])
+  NSString *customClass = [classManager customClassForObject: obj];
+
+  if(customClass != nil)
     {
+      [self _selectClass: customClass];
+    }
+  else if ([obj respondsToSelector: @selector(className)])
+    { 
       [self _selectClass: [obj className]];
     }
 }
@@ -439,7 +445,7 @@ static NSImage	*classesImage = nil;
 	  if ([selection count] > 0)
 	    {
 	      id obj = [[objectsView selection] objectAtIndex: 0];
-	      [self _selectClassWithObject: obj];
+	      [self selectClassWithObject: obj];
 	    }
 	}
 	break;

GormInspectorsManager.m

@@ -427,6 +427,10 @@
       obj = [(NSScrollView *)obj documentView];
     }
 
+  // select the current class in the document...
+  [(GormDocument *)[(id <IB>)NSApp activeDocument] selectClassWithObject: obj];
+
+
   /*
    * Set panel title for the type of object being inspected.
    */