--- a/MethodCategoryChange.st	Fri Nov 25 17:45:26 2011 +0100
+++ b/MethodCategoryChange.st	Fri Nov 25 17:45:29 2011 +0100
@@ -98,12 +98,20 @@
     ^ false
 ! !
 
+!MethodCategoryChange methodsFor:'visiting'!
+
+acceptChangeVisitor:aVisitor
+    ^ aVisitor visitMethodCategoryChange:self.
+
+    "Created: / 25-11-2011 / 17:13:58 / cg"
+! !
+
 !MethodCategoryChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodCategoryChange.st,v 1.20 2010-04-14 13:40:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodCategoryChange.st,v 1.21 2011-11-25 16:45:29 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodCategoryChange.st,v 1.20 2010-04-14 13:40:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodCategoryChange.st,v 1.21 2011-11-25 16:45:29 cg Exp $'
 ! !