--- a/SystemBrowser.st Thu Aug 17 17:25:06 2006 +0200
+++ b/SystemBrowser.st Thu Aug 17 17:25:20 2006 +0200
@@ -509,7 +509,7 @@
(c == TestCase and:[aClass isAbstract not "aClass ~~ TestCase"]) ifTrue:[
^ self testCaseClassIconFor:aClass
].
- (c == BuildDefinition) ifTrue:[
+ (c == ProjectDefinition) ifTrue:[
^ self packageIconSmall
].
c := c superclass
@@ -517,6 +517,7 @@
^ nil
"Created: / 17-08-2006 / 09:11:27 / cg"
+ "Modified: / 17-08-2006 / 17:24:04 / cg"
!
resourceIconForMethod:aMethod
@@ -5511,7 +5512,7 @@
!SystemBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.234 2006-08-17 07:48:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.235 2006-08-17 15:25:20 cg Exp $'
! !
SystemBrowser initialize!