507 ^ self containerClassIcon |
507 ^ self containerClassIcon |
508 ]. |
508 ]. |
509 (c == TestCase and:[aClass isAbstract not "aClass ~~ TestCase"]) ifTrue:[ |
509 (c == TestCase and:[aClass isAbstract not "aClass ~~ TestCase"]) ifTrue:[ |
510 ^ self testCaseClassIconFor:aClass |
510 ^ self testCaseClassIconFor:aClass |
511 ]. |
511 ]. |
512 (c == ProjectDefinition) ifTrue:[ |
512 (c == LibraryDefinition) ifTrue:[ |
513 ^ self packageIconSmall |
513 aClass ~~ LibraryDefinition ifTrue:[ |
|
514 ^ self packageIconSmall |
|
515 ]. |
|
516 ]. |
|
517 (c == ApplicationDefinition) ifTrue:[ |
|
518 aClass ~~ ApplicationDefinition ifTrue:[ |
|
519 ^ self packageIconGreenSmall |
|
520 ]. |
514 ]. |
521 ]. |
515 c := c superclass |
522 c := c superclass |
516 ]. |
523 ]. |
517 ^ nil |
524 ^ nil |
518 |
525 |
1181 ^Icon |
1188 ^Icon |
1182 constantNamed:#'SystemBrowser packageIcon' |
1189 constantNamed:#'SystemBrowser packageIcon' |
1183 ifAbsentPut:[(Depth2Image new) width: 16; height: 16; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@ATET@AUEE@APQAP@TDQT@AY%Z@@UUUX@J%*F@@E@I B)Z"X@*V(&@J%*I B)Z"X@*V($@J%*I@B)Z @@@T@@@@a') ; colorMapFromArray:#[0 0 0 132 0 132 255 255 0]; mask:((Depth1Image new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'A30O[A%LF?<O?0??G?<??3??O?<??3??O?8??C?8O?@b') ; yourself); yourself] |
1190 ifAbsentPut:[(Depth2Image new) width: 16; height: 16; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@ATET@AUEE@APQAP@TDQT@AY%Z@@UUUX@J%*F@@E@I B)Z"X@*V(&@J%*I B)Z"X@*V($@J%*I@B)Z @@@T@@@@a') ; colorMapFromArray:#[0 0 0 132 0 132 255 255 0]; mask:((Depth1Image new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'A30O[A%LF?<O?0??G?<??3??O?<??3??O?8??C?8O?@b') ; yourself); yourself] |
1184 ! |
1191 ! |
1185 |
1192 |
|
1193 packageIconGreenSmall |
|
1194 "This resource specification was automatically generated |
|
1195 by the ImageEditor of ST/X." |
|
1196 |
|
1197 "Do not manually edit this!! If it is corrupted, |
|
1198 the ImageEditor may not be able to read the specification." |
|
1199 |
|
1200 " |
|
1201 self packageIconGreenSmall inspect |
|
1202 ImageEditor openOnClass:self andSelector:#packageIconGreenSmall |
|
1203 Icon flushCachedIcons |
|
1204 " |
|
1205 |
|
1206 <resource: #image> |
|
1207 |
|
1208 ^Icon |
|
1209 constantNamed:#'SystemBrowser class packageIconGreenSmall' |
|
1210 ifAbsentPut:[(Depth4Image new) width: 13; height: 11; photometric:(#palette); bitsPerSample:(#[4]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@M7P@@7]@@7P7PC]CP@M4@7]4@4@@M7]7]7]@@@@[VY 4@@@@@4@A @@@@Y-Y X@@@@F[VXF@@@@A&5&A @@@@Y-Y @@@@@@CP@@@@@b') ; colorMapFromArray:#[0 0 0 255 255 255 255 0 0 0 255 0 0 0 255 0 255 255 0 255 0 255 0 255 127 0 0 0 127 0 0 0 127 0 127 127 127 127 0 132 0 132]; mask:((Depth1Image new) width: 13; height: 11; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'NGA,4F^PO?@_8C? O>@?8C? O<@? @@a') ; yourself); yourself] |
|
1211 ! |
|
1212 |
|
1213 packageIconOrangeSmall |
|
1214 "This resource specification was automatically generated |
|
1215 by the ImageEditor of ST/X." |
|
1216 |
|
1217 "Do not manually edit this!! If it is corrupted, |
|
1218 the ImageEditor may not be able to read the specification." |
|
1219 |
|
1220 " |
|
1221 self packageIconOrangeSmall inspect |
|
1222 ImageEditor openOnClass:self andSelector:#packageIconOrangeSmall |
|
1223 Icon flushCachedIcons |
|
1224 " |
|
1225 |
|
1226 <resource: #image> |
|
1227 |
|
1228 ^Icon |
|
1229 constantNamed:#'SystemBrowser class packageIconOrangeSmall' |
|
1230 ifAbsentPut:[(Depth4Image new) width: 13; height: 11; photometric:(#palette); bitsPerSample:(#[4]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@M7P@@7]@@7P7PC]CP@M4@7]4@4@@M7]7]7]@@@@[VY 4@@@@@4@A @@@@Y-Y X@@@@F[VXF@@@@A&5&A @@@@Y-Y @@@@@@CP@@@@@b') ; colorMapFromArray:#[0 0 0 255 255 255 255 0 0 0 255 0 0 0 255 0 255 255 255 139 0 255 0 255 127 0 0 0 127 0 0 0 127 0 127 127 127 127 0 132 0 132]; mask:((Depth1Image new) width: 13; height: 11; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'NGA,4F^PO?@_8C? O>@?8C? O<@? @@a') ; yourself); yourself] |
|
1231 ! |
|
1232 |
1186 packageIconSmall |
1233 packageIconSmall |
1187 "This resource specification was automatically generated |
1234 "This resource specification was automatically generated |
1188 by the ImageEditor of ST/X." |
1235 by the ImageEditor of ST/X." |
1189 |
1236 |
1190 "Do not manually edit this!! If it is corrupted, |
1237 "Do not manually edit this!! If it is corrupted, |
1191 the ImageEditor may not be able to read the specification." |
1238 the ImageEditor may not be able to read the specification." |
1192 |
1239 |
1193 " |
1240 " |
1194 self packageIcon inspect |
1241 self packageIconSmall inspect |
1195 ImageEditor openOnClass:self andSelector:#packageIcon |
1242 ImageEditor openOnClass:self andSelector:#packageIconSmall |
1196 Icon flushCachedIcons |
1243 Icon flushCachedIcons |
1197 " |
1244 " |
1198 |
1245 |
1199 <resource: #image> |
1246 <resource: #image> |
1200 |
1247 |
1201 ^Icon |
1248 ^Icon |
1202 constantNamed:#'SystemBrowser class packageIconSmall' |
1249 constantNamed:#'SystemBrowser class packageIconSmall' |
1203 ifAbsentPut:[(Depth4Image new) width: 13; height: 11; photometric:(#palette); bitsPerSample:(#[4]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@M7P@@@@@@7P7PC]4@@M4@7]4M4@@M7]7V[]@@@@[V7]4@@@@@4@A @@@@Y-Y X@@@@F[VXF@@@@A&5&A @@@@Y-Y @@@@@@CP@@@@@b') ; colorMapFromArray:#[0 0 0 255 255 255 255 0 0 0 255 0 0 0 255 0 255 255 255 255 0 255 0 255 127 0 0 0 127 0 0 0 127 0 127 127 127 127 0 132 0 132]; mask:((Depth1Image new) width: 13; height: 11; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'N@A,8F^0O?@_8C? O>@?8C? O<@? @@a') ; yourself); yourself] |
1250 ifAbsentPut:[(Depth4Image new) width: 13; height: 11; photometric:(#palette); bitsPerSample:(#[4]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@M7P@@7]@@7P7PC]CP@M4@7]4@4@@M7]7]7]@@@@[VY 4@@@@@4@A @@@@Y-Y X@@@@F[VXF@@@@A&5&A @@@@Y-Y @@@@@@CP@@@@@b') ; colorMapFromArray:#[0 0 0 255 255 255 255 0 0 0 255 0 0 0 255 0 255 255 255 255 0 255 0 255 127 0 0 0 127 0 0 0 127 0 127 127 127 127 0 132 0 132]; mask:((Depth1Image new) width: 13; height: 11; photometric:(#blackIs0); bitsPerSample:(#(1)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'NGA,4F^PO?@_8C? O>@?8C? O<@? @@a') ; yourself); yourself] |
1204 |
|
1205 "Created: / 17-08-2006 / 09:15:04 / cg" |
|
1206 ! |
1251 ! |
1207 |
1252 |
1208 padLockBlackMiniIcon |
1253 padLockBlackMiniIcon |
1209 <resource: #programImage> |
1254 <resource: #programImage> |
1210 |
1255 |