--- a/xquery/trunk/XQuery__TypeNode.st	Tue Apr 06 17:39:11 2010 +0000
+++ b/xquery/trunk/XQuery__TypeNode.st	Tue Apr 06 18:09:03 2010 +0000
@@ -10,7 +10,7 @@
 !
 
 
-!TypeNode methodsFor:'accessing'!
+!TypeNode methodsFor:'type value - accessing'!
 
 typeName
     "Superclass says that I am responsible to implement this method"
@@ -22,6 +22,6 @@
 
 !TypeNode class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /opt/data/cvs/stx/goodies/xmlsuite/xquery/XQuery__TypeNode.st,v 1.1 2007-12-05 21:09:13 vranyj1 Exp $'
+version_SVN
+    ^ '$Id$'
 ! !