--- a/SimpleView.st Wed Aug 06 11:57:11 1997 +0200
+++ b/SimpleView.st Thu Aug 07 13:00:04 1997 +0200
@@ -6485,17 +6485,17 @@
|sensor|
- shown ifTrue:[
- (sensor := self sensor) notNil ifTrue:[
- sensor flushExposeEventsFor:self.
- sensor addDamage:(0@0 extent:width@height) view:self
- ] ifFalse:[
- self redrawX:0 y:0 width:width height:height
- ]
+ (sensor := self sensor) notNil ifTrue:[
+ sensor flushExposeEventsFor:self.
+ sensor addDamage:(0@0 extent:width@height) view:self
+ ] ifFalse:[
+ shown ifTrue:[
+ self redrawX:0 y:0 width:width height:height
+ ]
]
"Created: 26.5.1996 / 17:17:38 / cg"
- "Modified: 19.4.1997 / 11:59:29 / cg"
+ "Modified: 6.8.1997 / 20:33:09 / cg"
!
invalidate:aRectangle
@@ -6509,16 +6509,16 @@
|sensor|
- shown ifTrue:[
- (sensor := self sensor) notNil ifTrue:[
- sensor addDamage:aRectangle view:self.
- ] ifFalse:[
- self redraw:aRectangle
- ]
+ (sensor := self sensor) notNil ifTrue:[
+ sensor addDamage:aRectangle view:self.
+ ] ifFalse:[
+ shown ifTrue:[
+ self redraw:aRectangle
+ ]
]
"Created: 26.5.1996 / 17:18:25 / cg"
- "Modified: 19.4.1997 / 11:59:18 / cg"
+ "Modified: 6.8.1997 / 20:33:16 / cg"
!
invalidate:aRectangle repairNow:doRepair
@@ -6528,18 +6528,18 @@
|sensor|
- shown ifTrue:[
- (sensor := self sensor) notNil ifTrue:[
- sensor addDamage:aRectangle view:self.
- doRepair ifTrue:[
- self repairDamage
- ]
- ] ifFalse:[
- self redraw:aRectangle
- ].
+ (sensor := self sensor) notNil ifTrue:[
+ sensor addDamage:aRectangle view:self.
+ (shown and:[doRepair]) ifTrue:[
+ self repairDamage
+ ]
+ ] ifFalse:[
+ shown ifTrue:[
+ self redraw:aRectangle
+ ].
]
- "Modified: 19.4.1997 / 12:01:35 / cg"
+ "Modified: 6.8.1997 / 18:22:29 / cg"
!
invalidateRepairNow:doRepair
@@ -7545,6 +7545,6 @@
!SimpleView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.226 1997-07-31 17:18:32 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.227 1997-08-07 10:58:16 cg Exp $'
! !
SimpleView initialize!