--- a/ChangeSet.st	Thu Nov 08 14:43:49 2001 +0100
+++ b/ChangeSet.st	Thu Nov 08 19:32:34 2001 +0100
@@ -631,6 +631,11 @@
 
 !ChangeSet methodsFor:'changes management'!
 
+add:aChange
+    super add:aChange.
+    self changed:#addChange with:aChange.
+!
+
 addClassCommentChangeFor:aClass
     "add a classComment change to the receiver"
 
@@ -1111,5 +1116,5 @@
 !ChangeSet class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.66 2001-11-08 13:43:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.67 2001-11-08 18:32:34 cg Exp $'
 ! !