--- a/Change.st	Mon Jul 05 17:28:48 1999 +0200
+++ b/Change.st	Mon Jul 05 22:28:21 1999 +0200
@@ -67,6 +67,12 @@
     "Created: / 7.2.1998 / 19:26:50 / cg"
 !
 
+isDoIt
+    ^ false
+
+    "Created: / 7.2.1998 / 19:26:50 / cg"
+!
+
 isMethodChange
     ^ false
 
@@ -95,5 +101,5 @@
 !Change class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.16 1999-07-05 15:28:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.17 1999-07-05 20:27:49 cg Exp $'
 ! !

--- a/DoItChange.st	Mon Jul 05 17:28:48 1999 +0200
+++ b/DoItChange.st	Mon Jul 05 22:28:21 1999 +0200
@@ -12,8 +12,14 @@
     "Created: / 16.2.1998 / 14:38:29 / cg"
 ! !
 
+!DoItChange methodsFor:'queries'!
+
+isDoIt
+    ^ true
+! !
+
 !DoItChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/DoItChange.st,v 1.1 1998-02-16 13:58:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/DoItChange.st,v 1.2 1999-07-05 20:28:21 cg Exp $'
 ! !