--- a/UIGalleryView.st Fri May 21 21:33:17 1999 +0200
+++ b/UIGalleryView.st Sat May 22 09:12:13 1999 +0200
@@ -648,7 +648,7 @@
|r currSel|
(currSel := selection) isNil ifTrue:[
- ^ self
+ ^ self
].
shown ifFalse:[^ self].
selection := nil.
@@ -656,27 +656,27 @@
self clippedByChildren:false.
self handlesOf:currSel do:[:aRectangle|
- self clearRectangle:aRectangle
+ self clearRectangle:aRectangle
].
self clippedByChildren:true.
r := currSel bounds.
subViews do:[:sv|
- |absOrg absFrame|
+ |absOrg absFrame|
- sv ~~ inputView ifTrue:[
- (sv bounds intersects:r) ifTrue:[
- "/ sv borderColor:(Color gray:5).
- sv borderColor:(Color black).
+ sv ~~ inputView ifTrue:[
+ (sv bounds intersects:r) ifTrue:[
+ sv borderColor:(Color white). "/ to force a redraw
+ sv borderColor:(Color black).
- sv withAllSubViewsDo:[:v|
- v realized ifTrue:[
- v fill:v viewBackground.
- v exposeX:0 y:0 width:v width height:v height.
- ]
- ]
- ]
- ]
+ sv withAllSubViewsDo:[:v|
+ v realized ifTrue:[
+ v fill:v viewBackground.
+ v exposeX:0 y:0 width:v width height:v height.
+ ]
+ ]
+ ]
+ ]
].
selection := currSel.