--- a/TypeConverter.st	Tue Apr 22 18:46:24 2008 +0200
+++ b/TypeConverter.st	Wed Apr 23 12:00:27 2008 +0200
@@ -1311,7 +1311,7 @@
                         ].
                         value := s asSymbol
                     ] ifFalse:[
-                        (#(true false) includes:s) ifTrue:[
+                        (#('true' 'false') includes:s) ifTrue:[
                             value := Object readFromString:s.
                         ] ifFalse:[
                             value := s asSymbol
@@ -1501,5 +1501,5 @@
 !TypeConverter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TypeConverter.st,v 1.54 2008-03-14 11:14:36 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TypeConverter.st,v 1.55 2008-04-23 10:00:27 cg Exp $'
 ! !