Mercurial Mercurial > hg > stx-libview / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed #exposeEventPending
authorClaus Gittinger <cg@exept.de>
Fri, 18 Sep 1998 15:59:24 +0200
changeset 2352 548f567b1454
parent 2351 bb7cb7d8d723
child 2353 e04098201f7c
fixed #exposeEventPending
DSurface.st file | annotate | diff | comparison | revisions
DisplaySurface.st file | annotate | diff | comparison | revisions 
--- a/DSurface.st	Fri Sep 18 15:52:29 1998 +0200
+++ b/DSurface.st	Fri Sep 18 15:59:24 1998 +0200
@@ -1831,8 +1831,10 @@
 
     |sensor|
 
-    ((sensor := self sensor) notNil and:[sensor hasDamageFor:self]) ifTrue:[^ true].
+    ((sensor := self sensor) notNil and:[sensor hasExposeEventFor:self]) ifTrue:[^ true].
     ^ device eventPending:#expose for:drawableId
+
+    "Modified: / 15.9.1998 / 23:18:16 / cg"
 !
 
 isPopUpView
@@ -2082,5 +2084,5 @@
 !DisplaySurface class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/DSurface.st,v 1.45 1998-09-14 17:37:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/DSurface.st,v 1.46 1998-09-18 13:59:24 cg Exp $'
 ! !
--- a/DisplaySurface.st	Fri Sep 18 15:52:29 1998 +0200
+++ b/DisplaySurface.st	Fri Sep 18 15:59:24 1998 +0200
@@ -1831,8 +1831,10 @@
 
     |sensor|
 
-    ((sensor := self sensor) notNil and:[sensor hasDamageFor:self]) ifTrue:[^ true].
+    ((sensor := self sensor) notNil and:[sensor hasExposeEventFor:self]) ifTrue:[^ true].
     ^ device eventPending:#expose for:drawableId
+
+    "Modified: / 15.9.1998 / 23:18:16 / cg"
 !
 
 isPopUpView
@@ -2082,5 +2084,5 @@
 !DisplaySurface class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.45 1998-09-14 17:37:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.46 1998-09-18 13:59:24 cg Exp $'
 ! !
hg/stx-libview