--- a/ClassDescription.st	Fri May 09 14:09:20 2003 +0200
+++ b/ClassDescription.st	Fri May 09 14:09:56 2003 +0200
@@ -840,10 +840,10 @@
     "return a collection of the instance variable name-strings"
 
     instvars isNil ifTrue:[
-        ^ #() "/ OrderedCollection new
+        ^ #() 
     ].
     instvars isString ifTrue:[
-        instvars := instvars asCollectionOfWords asArray.
+        instvars := instvars asCollectionOfWords asArray collect:[:varName| varName asSymbol].
     ].
 
     ^ instvars
@@ -4057,7 +4057,7 @@
 !ClassDescription class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.153 2003-05-07 14:39:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.154 2003-05-09 12:09:56 stefan Exp $'
 ! !
 
 ClassDescription initialize!