--- a/PluggableAdaptor.st Sun Jul 23 04:25:16 1995 +0200
+++ b/PluggableAdaptor.st Sun Jul 23 04:29:14 1995 +0200
@@ -35,7 +35,7 @@
version
"
-$Header: /cvs/stx/stx/libview2/PluggableAdaptor.st,v 1.4 1995-06-27 02:19:41 claus Exp $
+$Header: /cvs/stx/stx/libview2/PluggableAdaptor.st,v 1.5 1995-07-23 02:27:59 claus Exp $
"
!
@@ -294,8 +294,8 @@
updateBlock notNil ifTrue:[
(updateBlock value:model value:something value:aParameter)
ifTrue:[
- self notifyChange:#value
-"/ self changed:#value
+"/ self notifyChange:#value
+ self changed:#value
]
]
].