--- a/Tools_ProjectList.st	Wed Sep 20 14:31:32 2006 +0200
+++ b/Tools_ProjectList.st	Wed Sep 20 15:30:05 2006 +0200
@@ -412,6 +412,7 @@
 
     item := packageListView list value at:lineNr.
     item isNil ifTrue:[^ nil].
+    item isString ifTrue:[^ item asSymbol].
 
     item canExpand ifTrue:[
         now := Timestamp now.
@@ -436,6 +437,8 @@
     package := item package.
     package = self class nameListEntryForALL ifTrue:[^ nil].
     ^ package.
+
+    "Modified: / 20-09-2006 / 15:30:13 / cg"
 ! !
 
 !ProjectList methodsFor:'generators'!
@@ -783,5 +786,5 @@
 !ProjectList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.24 2006-09-14 14:21:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.25 2006-09-20 13:30:05 cg Exp $'
 ! !