--- a/PPTokenParser.st	Fri May 04 23:59:52 2012 +0200
+++ b/PPTokenParser.st	Sat May 05 00:00:04 2012 +0200
@@ -7,11 +7,6 @@
 	category:'PetitParser-Parsers'
 !
 
-PPTokenParser comment:'A parser that answers a token of the range my delegate parses.
-Instance Variables:
-	tokenClass      <PPToken class> The token sub-class to be used.'
-!
-
 
 !PPTokenParser methodsFor:'accessing'!
 
@@ -27,7 +22,7 @@
 
 initialize
 	tokenClass := self defaultTokenClass
-
+	
 ! !
 
 !PPTokenParser methodsFor:'private'!
@@ -42,6 +37,14 @@
 
 !PPTokenParser class methodsFor:'documentation'!
 
+version
+    ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPTokenParser.st,v 1.3 2012-05-04 22:00:04 vrany Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPTokenParser.st,v 1.3 2012-05-04 22:00:04 vrany Exp $'
+!
+
 version_SVN
-    ^ '$Id: PPTokenParser.st,v 1.2 2012-01-13 11:22:50 cg Exp $'
+    ^ '§Id: PPTokenParser.st 2 2010-12-17 18:44:23Z vranyj1 §'
 ! !