--- a/Change.st	Tue Sep 22 19:03:57 2009 +0200
+++ b/Change.st	Tue Sep 22 19:04:19 2009 +0200
@@ -208,27 +208,35 @@
 
 ! !
 
-!Change methodsFor:'queries'!
+!Change methodsFor:'testing'!
 
 isClassCategoryChange
+    "return true, if this is a class-category change"
+
     ^ false
 
     "Created: / 7.2.1998 / 19:26:50 / cg"
 !
 
 isClassChange
+    "return true, if this is a class-related change"
+
     ^ false
 
     "Created: / 7.2.1998 / 19:26:50 / cg"
 !
 
 isClassCommentChange
+    "return true, if this is a class-comment change"
+
     ^ false
 
     "Created: / 7.2.1998 / 19:26:50 / cg"
 !
 
 isClassDefinitionChange
+    "return true, if this is a class-definition change"
+
     ^ false
 
     "Created: / 7.2.1998 / 19:26:50 / cg"
@@ -268,6 +276,16 @@
 !
 
 isMethodChange
+    "true if this is a method related change"
+
+    ^ false
+
+    "Created: / 7.2.1998 / 19:26:50 / cg"
+!
+
+isMethodCodeChange
+    "true if this is a method's code change (not package, category etc.)"
+
     ^ false
 
     "Created: / 7.2.1998 / 19:26:50 / cg"
@@ -310,5 +328,5 @@
 !Change class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.44 2006-10-12 22:51:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.45 2009-09-22 17:04:19 cg Exp $'
 ! !