--- a/MethodCategoryChange.st	Wed Apr 13 18:42:55 2016 +0200
+++ b/MethodCategoryChange.st	Wed Apr 13 18:42:59 2016 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libbasic3' }"
 
+"{ NameSpace: Smalltalk }"
+
 MethodChange subclass:#MethodCategoryChange
 	instanceVariableNames:'origin'
 	classVariableNames:''
@@ -58,10 +60,18 @@
 "
 ! !
 
+!MethodCategoryChange class methodsFor:'instance creation'!
+
+class:cls selector:sel category:cat 
+    ^ self basicNew class:cls selector:sel category:cat
+
+
+! !
+
 !MethodCategoryChange class methodsFor:'others'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodCategoryChange.st,v 1.22 2012-07-31 12:27:40 vrany Exp $'
+    ^ '$Header$'
 ! !
 
 !MethodCategoryChange methodsFor:'accessing'!
@@ -148,9 +158,10 @@
 !MethodCategoryChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodCategoryChange.st,v 1.22 2012-07-31 12:27:40 vrany Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '§Id: MethodCategoryChange.st 1909 2012-03-31 00:14:49Z vranyj1 §'
+    ^ '$Id$'
 ! !
+