UIObjectView.st
changeset 95 c20189d75ec3
parent 91 86d0c649f95e
child 96 73725336b4fe
--- a/UIObjectView.st	Tue Apr 08 00:46:48 1997 +0200
+++ b/UIObjectView.st	Tue Apr 08 00:47:25 1997 +0200
@@ -908,13 +908,16 @@
             absFrame := absOrg extent:(anotherComponent extent).
             (absFrame intersects:r) ifTrue:[
                 anotherComponent withAllSubViewsDo:[:v |
-                    v clear.
-                    v exposeX:0 y:0 width:9999 height:9999.
+                    v shown ifTrue:[
+                        v clear.
+                        v exposeX:0 y:0 width:9999 height:9999.
+                    ]
                 ]
             ]
         ]
     ]
 
+    "Modified: 8.4.1997 / 00:32:26 / cg"
 !
 
 whichHandleOf:aView isHitBy:aPoint