--- a/WindowEvent.st	Wed Jan 29 13:34:56 1997 +0100
+++ b/WindowEvent.st	Wed Jan 29 14:17:45 1997 +0100
@@ -254,8 +254,8 @@
 	delegateQuery := #'handlesPointerLeave:inView:'.
     ] ifFalse:[ (type == #'exposeX:y:width:height:') ifTrue:[
 	deviceMessage := #'deviceExposeX:y:width:height:'.
-    ] ifFalse:[ (type == #'graphicExposeX:y:width:height:') ifTrue:[
-	deviceMessage := #'deviceGraphicExposeX:y:width:height:'.
+    ] ifFalse:[ (type == #'graphicsExposeX:y:width:height:final:') ifTrue:[
+	deviceMessage := #'deviceGraphicsExposeX:y:width:height:final:'.
     ]]]]]]]]]]].
 
     "
@@ -348,7 +348,7 @@
 	 or:[isButtonEvent
 	 or:[isPointerEvent
 	 or:[(type == #'exposeX:y:width:height:')
-	 or:[(type == #'graphicExposeX:y:width:height:')]]]]) ifTrue:[
+	 or:[(type == #'graphicsExposeX:y:width:height:final:')]]]]) ifTrue:[
 	    selector := deviceMessage
 	]        
     ].
@@ -528,5 +528,5 @@
 !WindowEvent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowEvent.st,v 1.29 1997-01-08 10:26:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowEvent.st,v 1.30 1997-01-29 13:17:06 cg Exp $'
 ! !