late valueHolder & subcanvas setup (in postbuild)
authorClaus Gittinger <cg@exept.de>
Tue, 08 May 2001 11:26:59 +0200
changeset 1465 4ff489c07764
parent 1464 00fa8c2e3329
child 1466 6fecdd5341dc
late valueHolder & subcanvas setup (in postbuild)
DataSetBuilder.st
--- a/DataSetBuilder.st	Sun May 06 12:53:41 2001 +0200
+++ b/DataSetBuilder.st	Tue May 08 11:26:59 2001 +0200
@@ -2229,13 +2229,13 @@
 
     self columns:aResourceSpec.
 
-    columns notEmpty ifTrue: [
-        self tabModel value: 1. 
-        self selectedColumnModel value:nil; value:1.    "/ toggle to force change
-        self updateInputFields.
-        self updateInfoLabel.
-        self updateHistory
-    ].
+"/    columns notEmpty ifTrue: [
+"/        self tabModel value: 1. 
+"/        self selectedColumnModel value:nil; value:1.    "/ toggle to force change
+"/        self updateInputFields.
+"/        self updateInfoLabel.
+"/        self updateHistory
+"/    ].
 
 ! !
 
@@ -2678,7 +2678,6 @@
 
         tabSelection == 0 ifTrue:[self tabModel value:1].
     ].
-
 ! !
 
 !DataSetBuilder methodsFor:'selection'!
@@ -2760,7 +2759,6 @@
      there is no need to ask for saving into a class"
 
     modalOpened := true.
-
     super openModalOnResourceSpec: aListSpec
 
 
@@ -2773,13 +2771,18 @@
 
     super postBuildWith:builder.
 
+    columns notEmpty ifTrue: [
+        self tabModel value: 1. 
+        self selectedColumnModel value:nil; value:1.    "/ toggle to force change
+        self updateInputFields.
+        self updateInfoLabel.
+        self updateHistory
+    ].
+
     (builder componentAt: #labelAndColumns) 
         selectConditionBlock: [:i|self askForItemModification];
         action: [:i|self cancel];
         selection: 1.
-
-
-
 !
 
 postOpenWith:aBuilder