--- a/TypeConverter.st	Fri Mar 02 15:57:12 2012 +0100
+++ b/TypeConverter.st	Tue Mar 20 21:27:26 2012 +0100
@@ -1625,7 +1625,11 @@
                 ifFalse:[
                     ''
                 ] ifTrue:[
-                    symbolValue printString. "/ storeString
+                    (symbolValue == #true or:[symbolValue == #false]) ifTrue:[
+                        symbolValue storeString  "/ to show the symbolness
+                    ] ifFalse:[
+                        symbolValue printString. "/ storeString
+                    ]
                 ]]
 
         putBlock:
@@ -1655,8 +1659,8 @@
 
         updateBlock: [:m :a :p | true]
 
-    "Created: / 21.2.1997 / 18:58:38 / cg"
-    "Modified: / 26.5.1998 / 15:06:06 / cg"
+    "Created: / 21-02-1997 / 18:58:38 / cg"
+    "Modified (comment): / 20-03-2012 / 21:25:48 / cg"
 !
 
 symbolOrNil
@@ -1868,9 +1872,9 @@
 !TypeConverter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TypeConverter.st,v 1.66 2012-01-22 10:35:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TypeConverter.st,v 1.67 2012-03-20 20:27:26 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/TypeConverter.st,v 1.66 2012-01-22 10:35:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TypeConverter.st,v 1.67 2012-03-20 20:27:26 cg Exp $'
 ! !