--- a/Tools_ClassGeneratorList.st	Thu Oct 22 14:39:51 2009 +0200
+++ b/Tools_ClassGeneratorList.st	Thu Oct 22 14:40:06 2009 +0200
@@ -329,7 +329,7 @@
     generator isNil ifTrue:[^ #() ].
     generator do:[:prj | theList add:prj].
     theList := theList asOrderedCollection sort.
-    theList addFirst:(self class nameListEntryForALL asText allItalic).
+    theList addFirst:(self class nameListEntryForALL allItalic).
     ^ theList
 
     "Created: / 25.2.2000 / 21:24:26 / cg"
@@ -361,7 +361,7 @@
     ].
     categories := categories asOrderedCollection.
     categories sort.
-    categories addFirst:(self class nameListEntryForALL asText allItalic).
+    categories addFirst:(self class nameListEntryForALL allItalic).
     ^ categories
 
     "Created: / 5.2.2000 / 13:42:12 / cg"
@@ -398,7 +398,7 @@
     allNamespaces := allNamespaces collect:[:ns | ns name].
     allNamespaces := allNamespaces asOrderedCollection.
     allNamespaces sort.
-    allNamespaces addFirst:(self class nameListEntryForALL asText allItalic).
+    allNamespaces addFirst:(self class nameListEntryForALL allItalic).
     ^ allNamespaces
 
     "Created: / 25.2.2000 / 21:21:14 / cg"
@@ -450,7 +450,7 @@
         allProjects addAll:AdditionalEmptyProjects.
     ].
     allProjects sort.
-    allProjects addFirst:(self class nameListEntryForALL asText allItalic).
+    allProjects addFirst:(self class nameListEntryForALL allItalic).
     ^ allProjects
 
     "Created: / 25.2.2000 / 21:22:06 / cg"
@@ -536,5 +536,9 @@
 !ClassGeneratorList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassGeneratorList.st,v 1.8 2009-09-14 18:16:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassGeneratorList.st,v 1.9 2009-10-22 12:40:06 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_ClassGeneratorList.st,v 1.9 2009-10-22 12:40:06 cg Exp $'
 ! !