building not complete in open from master
authorpenk
Mon, 19 Jan 2004 10:52:21 +0100
changeset 5442 4e025f6f8ed7
parent 5441 6a0eb99ae5f2
child 5443 27b5143d23f7
building not complete in open from master
AbstractDirectoryBrowser.st
DirectoryContentsBrowser.st
DirectoryTreeBrowser.st
--- a/AbstractDirectoryBrowser.st	Fri Jan 16 13:18:59 2004 +0100
+++ b/AbstractDirectoryBrowser.st	Mon Jan 19 10:52:21 2004 +0100
@@ -184,14 +184,18 @@
 postOpenAsSubcanvasWith:aBuilder
 
     super postOpenAsSubcanvasWith:aBuilder.
-    self postOpen.
+    self postOpenFromMaster:false.
+!
+
+postOpenFromMaster:standAlone 
+    self subclassResponsibility
 !
 
 postOpenWith:aBuilder
     "only invoked if the application not started from a master"
 
     super postOpenWith:aBuilder.
-    self postOpen.
+    self postOpenFromMaster:true.
 !
 
 preBuildWith:aBuilder
@@ -205,5 +209,5 @@
 !AbstractDirectoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.9 2003-11-11 09:50:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractDirectoryBrowser.st,v 1.10 2004-01-19 09:51:57 penk Exp $'
 ! !
--- a/DirectoryContentsBrowser.st	Fri Jan 16 13:18:59 2004 +0100
+++ b/DirectoryContentsBrowser.st	Mon Jan 19 10:52:21 2004 +0100
@@ -1881,12 +1881,14 @@
 "/    self columnDescriptors:(self tableColumns value).
 !
 
-postOpen
+postOpenFromMaster:standAlone
 
     self sortFileListsBy:(self sortBlockProperty value) withReverse:(self currentSortOrder value).
     self matchBlock:self filterBlockHolder value.
-    self currentFileNameHolderChangedForCommon.
-    self currentFileNameHolderChanged.
+    standAlone ifTrue:[
+        self currentFileNameHolderChangedForCommon.
+        self currentFileNameHolderChanged.
+    ].
     self viewedColumnsChanged.
     self startUpdateTask.
     self windowGroup addPreEventHook:self.
@@ -3099,5 +3101,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.144 2004-01-15 12:43:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.145 2004-01-19 09:52:21 penk Exp $'
 ! !
--- a/DirectoryTreeBrowser.st	Fri Jan 16 13:18:59 2004 +0100
+++ b/DirectoryTreeBrowser.st	Mon Jan 19 10:52:21 2004 +0100
@@ -1250,14 +1250,16 @@
     browser multipleSelectOk:self multipleSelect
 !
 
-postOpen
+postOpenFromMaster:standAlone
 
 "/    self windowGroup application class == FileBrowserV2 ifTrue:[
 "/        self multipleSelect:true.
 "/    ].
     self rootHolderChanged.
-    self currentFileNameHolderChangedForCommon.
-    self currentFileNameHolderChanged.
+    standAlone ifTrue:[
+        self currentFileNameHolderChangedForCommon.
+        self currentFileNameHolderChanged.
+    ].
     self sortFileListsBy:self sortPropertyInTree value.
     self windowGroup addPreEventHook:self.
 !
@@ -1303,5 +1305,5 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.82 2004-01-14 09:49:06 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.83 2004-01-19 09:52:12 penk Exp $'
 ! !