--- a/Method.st	Thu Oct 22 13:43:15 2009 +0200
+++ b/Method.st	Thu Oct 22 14:02:09 2009 +0200
@@ -428,9 +428,9 @@
      
     mclass == aClass ifTrue:[ ^ self ].
 
-    (mclass notNil and:[aClass notNil]) ifTrue:[
-        "/ 'Method [warning]: mclass already set' errorPrintCR.
-    ].
+"/     (mclass notNil and:[aClass notNil]) ifTrue:[
+"/         'Method [warning]: mclass already set' errorPrintCR.
+"/     ].
     mclass := aClass.
 
     "Modified: / 28-11-2006 / 12:12:27 / cg"
@@ -2884,11 +2884,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.333 2009-10-14 18:15:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.334 2009-10-22 12:02:09 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.333 2009-10-14 18:15:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.334 2009-10-22 12:02:09 cg Exp $'
 ! !
 
 Method initialize!