--- a/NameSpace.st	Thu Feb 13 22:02:35 2014 +0100
+++ b/NameSpace.st	Fri Feb 14 10:47:41 2014 +0100
@@ -220,6 +220,8 @@
                 imports: imports
                 category: category
 
+    "VW5i compatibility class/namespace creation"
+
     ^ self
         defineClass: name
         superclass: superclass
@@ -279,6 +281,8 @@
 !
 
 defineNameSpace:nameSymbol private:private imports:imports category:category
+    "VW5i compatibility class/namespace creation"
+
     |newNameSpace|
 
     private ifTrue:[self shouldImplement].     "/ what to do ?
@@ -734,10 +738,10 @@
 !NameSpace class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/NameSpace.st,v 1.76 2013-01-18 20:56:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/NameSpace.st,v 1.77 2014-02-14 09:47:41 cg Exp $'
 !
 
 version_SVN
-    ^ '§ Id: NameSpace.st 10643 2011-06-08 21:53:07Z vranyj1  §'
+    ^ '$ Id: NameSpace.st 10643 2011-06-08 21:53:07Z vranyj1  $'
 ! !