# HG changeset patch # User Claus Gittinger # Date 1256212929 -7200 # Node ID 973c8740503b4c229df6604217d0ec93ede42242 # Parent a8a569a96301779497e887f7c891647e0237ad10 changed: #mclass: diff -r a8a569a96301 -r 973c8740503b Method.st --- 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!