SelectionInListModelView.st
changeset 4796 6c35c2439ca3
parent 4702 e7e4cf796487
child 4873 576dc9a44d18
--- a/SelectionInListModelView.st	Sat Jul 04 03:05:44 2015 +0200
+++ b/SelectionInListModelView.st	Wed Jul 08 11:59:10 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1999 by eXept Software AG
 	      All Rights Reserved
@@ -2247,7 +2249,9 @@
     cachedMaxIdx := cachedLinesY size.
     cachedMaxIdx == 0 ifTrue:[ ^ 0 ].
 
-    y1 := cachedLinesY at:cachedMaxIdx.
+    "/ !!!! cachedLinesY at:cachedMaxIdx might return nil (async reorg)
+    y1 := cachedLinesY at:cachedMaxIdx ifAbsent:nil.
+    y1 isNil ifTrue:[^ 0 ]. "/ is under construction due ro async. events
 
     (minimumEditorHeight notNil and:[openEditorAction notNil]) ifTrue:[
         y0 := cachedLinesY at:(cachedMaxIdx - 1) ifAbsent:0.
@@ -2823,10 +2827,10 @@
 !SelectionInListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.177 2015-02-01 13:14:45 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInListModelView.st,v 1.177 2015-02-01 13:14:45 cg Exp $'
+    ^ '$Header$'
 ! !