equal
deleted
inserted
replaced
246 (packageToItemDictionary includesKey:package) ifFalse:[ |
246 (packageToItemDictionary includesKey:package) ifFalse:[ |
247 self addPackage:package |
247 self addPackage:package |
248 ]. |
248 ]. |
249 ]. |
249 ]. |
250 |
250 |
251 "/ Smalltalk allClassesDo:[:eachClass | |
251 "/ environment allClassesDo:[:eachClass | |
252 "/ |package| |
252 "/ |package| |
253 "/ |
253 "/ |
254 "/ package := eachClass package asSymbol. |
254 "/ package := eachClass package asSymbol. |
255 "/ (packageToItemDictionary includesKey:package) ifFalse:[ |
255 "/ (packageToItemDictionary includesKey:package) ifFalse:[ |
256 "/ self addPackage:package |
256 "/ self addPackage:package |
516 ! ! |
516 ! ! |
517 |
517 |
518 !HierarchicalProjectList class methodsFor:'documentation'! |
518 !HierarchicalProjectList class methodsFor:'documentation'! |
519 |
519 |
520 version |
520 version |
521 ^ '$Id: Tools__HierarchicalProjectList.st 8083 2013-01-14 11:48:37Z vranyj1 $' |
521 ^ '$Header: /cvs/stx/stx/libtool/Tools_HierarchicalProjectList.st,v 1.13 2013-09-05 10:46:11 vrany Exp $' |
522 ! |
522 ! |
523 |
523 |
524 version_CVS |
524 version_CVS |
525 ^ '§Header: /cvs/stx/stx/libtool/Tools_HierarchicalProjectList.st,v 1.10 2011/07/20 12:54:00 cg Exp §' |
525 ^ '$Header: /cvs/stx/stx/libtool/Tools_HierarchicalProjectList.st,v 1.13 2013-09-05 10:46:11 vrany Exp $' |
526 ! |
526 ! |
527 |
527 |
528 version_HG |
528 version_HG |
529 |
529 |
530 ^ '$Changeset: <not expanded> $' |
530 ^ '$Changeset: <not expanded> $' |