'From Pharo0.1 of 16 May 2008 [Latest update: #10371] on 10 July 2009 at 10:54:16 am'! !OBPackagesOrClassesNode methodsFor: 'package list' stamp: 'Henrik Sperre Johansen 7/10/2009 10:19'! addUnpackagedCategories: categories to: pkgs | remainingCats | remainingCats := SystemOrganization categories difference: categories asSet. remainingCats ifNotEmpty: [ pkgs add: (OBMonticelloPackageNode new workingCopy: (OBDummyPackage categories: remainingCats asOrderedCollection))].! ! !PackageInfo methodsFor: 'dependencies' stamp: 'Henrik Sperre Johansen 7/10/2009 10:31'! externalClasses | myClasses | myClasses := self classesAndMetaClasses asSet. ^ Array streamContents: [:s | ProtoObject withAllSubclassesDo: [:class | (myClasses includes: class) ifFalse: [s nextPut: class]]]! !