--- a/ChangeSet.st	Mon Jun 17 18:44:33 2002 +0200
+++ b/ChangeSet.st	Wed Jun 19 14:07:11 2002 +0200
@@ -881,6 +881,7 @@
 !ChangeSet methodsFor:'private - accessing'!
 
 addChange:aChange
+    aChange timeStamp:(AbsoluteTime now).
     self add:aChange.
     self changed:#addChange: with:aChange.
 
@@ -1208,5 +1209,5 @@
 !ChangeSet class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.76 2002-02-08 14:46:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.77 2002-06-19 12:07:11 cg Exp $'
 ! !