diff -r fa18d386b936 -r 23ff7c325946 DataSetBuilder.st
--- a/DataSetBuilder.st	Mon Jan 19 11:38:41 1998 +0100
+++ b/DataSetBuilder.st	Mon Jan 19 11:39:44 1998 +0100
@@ -912,11 +912,11 @@
           #'window:' 
            #(#WindowSpec
               #'name:' 'Class Definition'
-              #'layout:' #(#LayoutFrame 299 0 162 0 624 0 291 0)
+              #'layout:' #(#LayoutFrame 112 0 251 0 437 0 380 0)
               #'label:' 'Class Definition'
               #'min:' #(#Point 10 10)
               #'max:' #(#Point 1152 900)
-              #'bounds:' #(#Rectangle 299 162 625 292)
+              #'bounds:' #(#Rectangle 112 251 438 381)
               #'usePreferredExtent:' false
           )
           #'component:' 
@@ -924,12 +924,25 @@
               #'collection:' 
                #(
                  #(#LabelSpec
+                    #'name:' 'topLabel'
+                    #'layout:' #(#Point 2 10)
+                    #'label:' 'Class for code:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#LabelSpec
                     #'name:' 'classLabel'
                     #'layout:' #(#AlignmentOrigin 50 0.11 50 0 1 0.5)
                     #'label:' 'Class:'
                     #'adjust:' #right
                     #'resizeForLabel:' true
                 )
+                 #(#InputFieldSpec
+                    #'name:' 'classNameInputField'
+                    #'layout:' #(#LayoutFrame 51 0.11 39 0 -2 1.0 61 0)
+                    #'tabable:' true
+                    #'model:' #classNameChannel
+                )
                  #(#LabelSpec
                     #'name:' 'superClassLabel'
                     #'layout:' #(#AlignmentOrigin 50 0.11 77 0 1 0.5)
@@ -937,54 +950,18 @@
                     #'adjust:' #right
                     #'resizeForLabel:' true
                 )
-                 #(#LabelSpec
-                    #'name:' 'topLabel'
-                    #'layout:' #(#Point 2 10)
-                    #'label:' 'Class for code:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
                  #(#InputFieldSpec
-                    #'name:' 'classNameField'
-                    #'layout:' #(#LayoutFrame 51 0.11 39 0 -2 1.0 61 0)
-                    #'tabable:' true
-                    #'model:' #classNameChannel
-                )
-                 #(#HorizontalPanelViewSpec
-                    #'name:' 'commitPanel'
-                    #'layout:' #(#LayoutFrame 2 0.0 -30 1.0 -2 1.0 -2 1.0)
-                    #'component:' 
-                     #(#SpecCollection
-                        #'collection:' 
-                         #(
-                           #(#ActionButtonSpec
-                              #'name:' 'button1'
-                              #'label:' 'Cancel'
-                              #'tabable:' true
-                              #'model:' #cancel
-                              #'extent:' #(#Point 156 22)
-                          )
-                           #(#ActionButtonSpec
-                              #'name:' 'button2'
-                              #'label:' 'OK'
-                              #'tabable:' true
-                              #'model:' #accept
-                              #'isDefault:' true
-                              #'extent:' #(#Point 157 22)
-                          )
-                        )
-                    )
-                    #'horizontalLayout:' #fitSpace
-                    #'verticalLayout:' #fitSpace
-                    #'horizontalSpace:' 3
-                    #'verticalSpace:' 3
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'inputField1'
+                    #'name:' 'superclassNameInputField'
                     #'layout:' #(#LayoutFrame 51 0.11 67 0 -2 1.0 89 0)
                     #'tabable:' true
                     #'model:' #superclassNameChannel
                 )
+                 #(#UISubSpecification
+                    #'name:' 'SubSpecification'
+                    #'layout:' #(#LayoutFrame 0 0.0 -29 1 0 1.0 -5 1.0)
+                    #'majorKey:' #ToolApplicationModel
+                    #'minorKey:' #windowSpecForCommitWithoutChannels
+                )
               )
           )
       )