--- a/Visitor.st	Tue Jun 03 12:41:27 2008 +0200
+++ b/Visitor.st	Tue Jun 03 18:22:09 2008 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic' }"
 
 Object subclass:#Visitor
@@ -233,7 +232,7 @@
 visitSymbol:aSymbol with:aParameter
     "visit a Symbol"
 
-    self visitObject:aSymbol with:aParameter
+    ^ self visitString:aSymbol with:aParameter
 !
 
 visitTimestamp:aTimestamp with:aParameter
@@ -245,5 +244,5 @@
 !Visitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Visitor.st,v 1.2 2004-06-11 17:54:29 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Visitor.st,v 1.3 2008-06-03 16:22:09 stefan Exp $'
 ! !