--- a/Change.st	Tue Apr 08 16:03:00 2003 +0200
+++ b/Change.st	Wed Apr 09 12:50:33 2003 +0200
@@ -229,6 +229,10 @@
     "Created: / 7.2.1998 / 19:26:50 / cg"
 !
 
+isMethodDefinitionChange
+    ^ false
+!
+
 isMethodRemoveChange
     ^ false
 !
@@ -256,5 +260,5 @@
 !Change class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.36 2002-11-11 09:39:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.37 2003-04-09 10:50:05 cg Exp $'
 ! !

--- a/MethodDefinitionChange.st	Tue Apr 08 16:03:00 2003 +0200
+++ b/MethodDefinitionChange.st	Wed Apr 09 12:50:33 2003 +0200
@@ -1,3 +1,5 @@
+"{ Package: 'stx:libbasic3' }"
+
 MethodChange subclass:#MethodDefinitionChange
 	instanceVariableNames:'attributes'
 	classVariableNames:''
@@ -11,15 +13,23 @@
 attributes
     "return the value of the instance variable 'attributes' (automatically generated)"
 
-    ^ attributes!
+    ^ attributes
+!
 
 attributes:something
     "set the value of the instance variable 'attributes' (automatically generated)"
 
-    attributes := something.! !
+    attributes := something.
+! !
+
+!MethodDefinitionChange methodsFor:'queries'!
+
+isMethodDefinitionChange
+    ^ true
+! !
 
 !MethodDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodDefinitionChange.st,v 1.1 2000-03-21 12:46:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodDefinitionChange.st,v 1.2 2003-04-09 10:50:33 cg Exp $'
 ! !