ListModelView.st
changeset 1580 523119ab4e30
parent 1566 1932f88e8811
child 1595 0bf8a4b72e88
--- a/ListModelView.st	Tue Oct 05 16:02:05 1999 +0200
+++ b/ListModelView.st	Wed Oct 06 13:35:03 1999 +0200
@@ -1396,9 +1396,10 @@
      dY         "{ Class:SmallInteger }"
     |
 
-    shown ifFalse:[
+    realized ifFalse:[
         ^ self
     ].
+
     (winGrp := self windowGroup) notNil ifTrue:[
         winGrp processRealExposeEventsFor:self.
     ].
@@ -1500,6 +1501,6 @@
 !ListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.27 1999-09-29 05:02:35 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.28 1999-10-06 11:35:03 ca Exp $'
 ! !
 ListModelView initialize!