added: #commonPostOpen
authorClaus Gittinger <cg@exept.de>
Sun, 04 Nov 2012 13:17:03 +0100
changeset 12014 9d3d20c4ff34
parent 12013 b25c25ff6211
child 12015 46ef5b716f88
added: #commonPostOpen changed: #commonPostBuild
Tools_BrowserList.st
--- a/Tools_BrowserList.st	Sun Nov 04 11:40:58 2012 +0100
+++ b/Tools_BrowserList.st	Sun Nov 04 13:17:03 2012 +0100
@@ -1566,11 +1566,6 @@
 commonPostBuild
     |list|
 
-    builder window realized ifFalse:[
-        listValid := false.
-        ^ self.
-    ].
-
     self slaveMode value == true ifFalse:[
         listValid ifFalse:[self enqueueDelayedUpdateList "updateList"].
     ] ifTrue:[
@@ -1587,7 +1582,6 @@
         list ignoreReselect:false.
     ].
 
-
     UserPreferences current useInPlaceSearchInBrowserLists ifTrue:[
         self supportsSearch ifTrue:[
             list notNil ifTrue:[
@@ -1599,6 +1593,13 @@
     ]
 
     "Modified: / 28-07-2011 / 09:39:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+commonPostOpen
+    super commonPostOpen.
+    listValid ifFalse:[
+        self enqueueDelayedUpdateList.
+    ]. 
 ! !
 
 !BrowserList::SearchHandler class methodsFor:'instance creation'!
@@ -1872,9 +1873,9 @@
 !BrowserList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.50 2012-11-03 16:47:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.51 2012-11-04 12:17:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.50 2012-11-03 16:47:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.51 2012-11-04 12:17:03 cg Exp $'
 ! !