--- a/ClassDefinitionChange.st	Thu May 09 13:20:58 2013 +0100
+++ b/ClassDefinitionChange.st	Thu May 09 13:50:49 2013 +0100
@@ -177,12 +177,15 @@
 !
 
 nameSpaceName
+
+    "/ JV: What is the following good for? Please explain..."
     objectType == #variable ifTrue:[
         ^ nil
     ].
     ^ self cutNameSpaceOf:(self nameSpaceOverride ? super nameSpaceName)
 
     "Modified: / 07-09-2011 / 20:47:14 / cg"
+    "Modified (comment): / 09-05-2013 / 13:46:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 nameSpaceName: aNameSpaceName classType: aClassType otherParameters:otherParametersArg
@@ -774,11 +777,11 @@
 !ClassDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.82 2013-05-01 08:31:30 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.83 2013-05-09 13:47:37 +0100 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.82 2013-05-01 08:31:30 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.83 2013-05-09 13:47:37 +0100 vrany Exp $'
 !
 
 version_HG