--- a/ClassDefinitionChange.st	Fri Nov 24 12:41:08 2006 +0100
+++ b/ClassDefinitionChange.st	Mon Nov 27 15:43:44 2006 +0100
@@ -311,13 +311,13 @@
             (source includesString:'private') ifFalse:[
                 private := false.
             ] ifTrue:[
-                (self changeClass notNil
-                and:[self changeClass isLoaded not]) ifTrue:[
-                    "/ cannot be private
-                    private := false
-                ] ifTrue:[
+"/                (self changeClass notNil
+"/                and:[self changeClass isLoaded not]) ifTrue:[
+"/                    "/ cannot be private
+"/                    private := false
+"/                ] ifTrue:[
                     self setupFromSource.
-                ].
+"/                ].
             ].
         ].
     ].
@@ -424,5 +424,5 @@
 !ClassDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.45 2006-11-20 11:36:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.46 2006-11-27 14:43:44 ca Exp $'
 ! !