--- a/MethodChange.st	Fri Sep 18 14:43:53 2009 +0200
+++ b/MethodChange.st	Fri Sep 18 14:43:56 2009 +0200
@@ -53,10 +53,22 @@
 
 !MethodChange class methodsFor:'instance creation'!
 
+class:cls selector:sel category:cat 
+    ^ self basicNew class:cls selector:sel category:cat
+
+
+!
+
 class:cls selector:sel source:src category:cat
     ^ self basicNew class:cls selector:sel source:src category:cat
 !
 
+className:clsName selector:sel category:cat 
+    ^ self basicNew className:clsName selector:sel category:cat
+
+    "Created: / 12-11-2006 / 15:54:25 / cg"
+!
+
 className:clsName selector:sel source:src category:cat
     ^ self basicNew className:clsName selector:sel source:src category:cat
 ! !
@@ -276,5 +288,5 @@
 !MethodChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.47 2009-02-16 17:09:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.48 2009-09-18 12:43:56 cg Exp $'
 ! !