# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1364213643 -3600
# Node ID 66833743333c13cb662f93830d402421bb168ab0
# Parent  fce70ea7d5d7445e7e2c73a9facde86bbeb4e237
class: Tools::ProjectBuilderAssistantApplication
changed:
        #newProjectsNameListSpec
        #page1_projectTypeSelectionSpec

diff -r fce70ea7d5d7 -r 66833743333c Tools__ProjectBuilderAssistantApplication.st
--- a/Tools__ProjectBuilderAssistantApplication.st	Mon Mar 25 01:52:26 2013 +0100
+++ b/Tools__ProjectBuilderAssistantApplication.st	Mon Mar 25 13:14:03 2013 +0100
@@ -449,7 +449,7 @@
                           isTriggerOnDown: true
                           onCallBackSelector: projectTypeChanged
                           select: #'GUI-Application'
-                          extent: (Point 136 22)
+                          extent: (Point 294 22)
                         )
                        (RadioButtonSpec
                           label: 'Non-GUI Application'
@@ -459,7 +459,7 @@
                           isTriggerOnDown: true
                           onCallBackSelector: projectTypeChanged
                           select: #'NonGUI-Application'
-                          extent: (Point 136 22)
+                          extent: (Point 294 22)
                         )
                        (RadioButtonSpec
                           label: 'Class Library'
@@ -468,8 +468,8 @@
                           model: projectTypeHolder
                           isTriggerOnDown: true
                           onCallBackSelector: projectTypeChanged
-                          select: #Library
-                          extent: (Point 136 22)
+                          select: Library
+                          extent: (Point 294 22)
                         )
                        )
                      
@@ -532,8 +532,6 @@
          
         )
       )
-
-    "Modified: / 20-07-2012 / 13:27:45 / cg"
 !
 
 page2_projectSelectionSpec
@@ -1584,6 +1582,7 @@
           name: 'NewApplication'
           min: (Point 0 0)
           bounds: (Rectangle 0 0 131 207)
+          usePreferredExtent: true
         )
         component: 
        (SpecCollection
@@ -1600,6 +1599,8 @@
               useIndex: false
               sequenceList: listOfNewProjectsName
               doubleClickChannel: newProjectsNameListDoubleClickChannel
+              usePreferredHeight: true
+              useDynamicPreferredHeight: true
             )
            )