--- a/Tools_ProjectList.st	Mon Aug 21 15:50:38 2006 +0200
+++ b/Tools_ProjectList.st	Mon Aug 21 15:59:37 2006 +0200
@@ -655,6 +655,9 @@
         |thisC entry rawEntry prefix indent|
 
         thisC := this asCollectionOfSubstringsSeparatedByAny:':/'.
+        thisC isEmpty ifTrue:[
+            thisC := Array with:Project noProjectID.
+        ].
 
         [
             |stackTop|
@@ -682,7 +685,7 @@
     ].
 
     "Created: / 17-02-2000 / 23:43:05 / cg"
-    "Modified: / 17-08-2006 / 15:08:42 / cg"
+    "Modified: / 21-08-2006 / 15:55:02 / cg"
 !
 
 release
@@ -753,5 +756,5 @@
 !ProjectList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.11 2006-08-21 10:21:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.12 2006-08-21 13:59:37 cg Exp $'
 ! !