--- a/Scanner.st	Wed May 12 23:52:01 2004 +0200
+++ b/Scanner.st	Thu May 13 00:05:45 2004 +0200
@@ -719,6 +719,10 @@
     ^ allowDollarInIdentifier
 !
 
+allowDollarInIdentifier:something
+    allowDollarInIdentifier := something.
+!
+
 allowOldStyleAssignment
     ^ allowOldStyleAssignment
 !
@@ -2696,7 +2700,7 @@
 !Scanner class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.189 2004-05-12 21:52:01 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.190 2004-05-12 22:05:45 stefan Exp $'
 ! !
 
 Scanner initialize!