equal
deleted
inserted
replaced
654 ^ aProjectList collect:[:this | |
654 ^ aProjectList collect:[:this | |
655 |thisC entry rawEntry prefix indent| |
655 |thisC entry rawEntry prefix indent| |
656 |
656 |
657 thisC := this asCollectionOfSubstringsSeparatedByAny:':/'. |
657 thisC := this asCollectionOfSubstringsSeparatedByAny:':/'. |
658 thisC isEmpty ifTrue:[ |
658 thisC isEmpty ifTrue:[ |
659 thisC := Array with:Project noProjectID. |
659 thisC := Array with:'<<NULL>>'. |
660 ]. |
660 ]. |
661 |
661 |
662 [ |
662 [ |
663 |stackTop| |
663 |stackTop| |
664 |
664 |
683 entry := (String new:indent) , rawEntry. |
683 entry := (String new:indent) , rawEntry. |
684 entry. |
684 entry. |
685 ]. |
685 ]. |
686 |
686 |
687 "Created: / 17-02-2000 / 23:43:05 / cg" |
687 "Created: / 17-02-2000 / 23:43:05 / cg" |
688 "Modified: / 21-08-2006 / 15:55:02 / cg" |
688 "Modified: / 21-08-2006 / 18:35:55 / cg" |
689 ! |
689 ! |
690 |
690 |
691 release |
691 release |
692 super release. |
692 super release. |
693 |
693 |
754 ! ! |
754 ! ! |
755 |
755 |
756 !ProjectList class methodsFor:'documentation'! |
756 !ProjectList class methodsFor:'documentation'! |
757 |
757 |
758 version |
758 version |
759 ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.12 2006-08-21 13:59:37 cg Exp $' |
759 ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.13 2006-08-21 16:37:14 cg Exp $' |
760 ! ! |
760 ! ! |