--- a/ChangesBrowser.st	Wed Mar 26 18:30:54 1997 +0100
+++ b/ChangesBrowser.st	Thu Mar 27 12:14:01 1997 +0100
@@ -430,7 +430,12 @@
     compareChanges := false.
     autoUpdate := false.
 
-    checkBlock := [self checkIfFileHasChanged].
+    "
+      checkBlock is executed by the Processor.
+      We use #pushEvent: to perform the update
+      in our windowgroups process.
+    "
+    checkBlock := [self pushEvent:#checkIfFileHasChanged].
 
     panel := VariableVerticalPanel origin:(0.0 @ 0.0)
                                    corner:(1.0 @ 1.0)
@@ -475,6 +480,7 @@
     tabSpec align:    #(#left  #left     #left  #left).
 
     "Modified: 24.2.1996 / 16:07:51 / cg"
+    "Modified: 27.3.1997 / 11:07:07 / stefan"
 !
 
 realize
@@ -2460,5 +2466,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.106 1997-03-19 21:23:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.107 1997-03-27 11:14:01 stefan Exp $'
 ! !