--- a/TriggerValue.st	Mon Jul 27 20:02:13 1998 +0200
+++ b/TriggerValue.st	Tue Jul 28 11:54:04 1998 +0200
@@ -85,15 +85,17 @@
 !TriggerValue methodsFor:'accessing'!
 
 value:anObject
-    "redefined to send change notifications on every store"
+    "redefined to send change notifications on every store,
+     even if the same value is stored again."
 
     self setValue:anObject.
-    "/ self notifyChange:#value
     self changed:#value
+
+    "Modified: / 28.7.1998 / 11:22:32 / cg"
 ! !
 
 !TriggerValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TriggerValue.st,v 1.9 1996-05-18 15:37:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TriggerValue.st,v 1.10 1998-07-28 09:54:04 cg Exp $'
 ! !