--- a/Tools__ProjectBuilderAssistantApplication.st	Wed Apr 03 20:39:38 2013 +0200
+++ b/Tools__ProjectBuilderAssistantApplication.st	Thu Apr 04 16:16:39 2013 +0200
@@ -383,11 +383,37 @@
 #stopMake
 'Abort the ongoing build process. Please clear the build directory afterwards to remove any leftover garbage.'
 
+#hideOtherStartupClasses
+'Hide startup classes from other packages. Uncheck to see them.\(Notice: the startup class really should be in the same package)'
+
 )
 
     "Modified: / 06-09-2012 / 16:09:10 / cg"
 ! !
 
+!ProjectBuilderAssistantApplication class methodsFor:'help specs'!
+
+helpSpec
+    "This resource specification was automatically generated
+     by the UIHelpTool of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the UIHelpTool may not be able to read the specification."
+
+    "
+     UIHelpTool openOnClass:Tools::ProjectBuilderAssistantApplication    
+    "
+
+    <resource: #help>
+
+    ^ super helpSpec addPairsFrom:#(
+
+#hideOtherStartupClasses
+''
+
+)
+! !
+
 !ProjectBuilderAssistantApplication class methodsFor:'interface specs'!
 
 page1_projectTypeSelectionSpec
@@ -852,21 +878,21 @@
                  (InputFieldSpec
                     name: 'EntryField1'
                     layout: (LayoutFrame 1 0 6 0 -113 1 28 0)
+                    activeHelpKey: nameOfStartupClass
                     model: newStartupClassName
                     acceptOnReturn: true
                     acceptOnTab: true
                     acceptOnLostFocus: true
                     acceptOnPointerLeave: true
                     emptyFieldReplacementText: 'MyStandAloneStartup'
-              activeHelpKey: nameOfStartupClass    
                   )
                  (ActionButtonSpec
                     label: 'Create'
                     name: 'Button1'
                     layout: (LayoutFrame -100 1 6 0 1 1 28 0)
+                    activeHelpKey: createNewStartupClass
                     translateLabel: true
                     model: createNewStartupClass
-              activeHelpKey: createNewStartupClass    
                   )
                  )
                
@@ -913,6 +939,7 @@
                     label: 'Hide other Startup Classes'
                     name: 'CheckBox1'
                     layout: (LayoutFrame -1 0 -20 1 0 1 2 1)
+                    activeHelpKey: hideOtherStartupClasses
                     model: hideOtherStartupClasses
                     translateLabel: true
                   )