--- a/Tools__ProjectBuilderAssistantApplication.st	Tue Oct 20 22:46:36 2009 +0200
+++ b/Tools__ProjectBuilderAssistantApplication.st	Tue Oct 20 22:55:11 2009 +0200
@@ -19,7 +19,7 @@
 
 !ProjectBuilderAssistantApplication class methodsFor:'interface specs'!
 
-_1_projectTypeSelectionSpec
+page1_projectTypeSelectionSpec
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
 
@@ -27,15 +27,15 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#_1_projectTypeSelectionSpec
-     ProjectBuilderAssistantApplication new openInterface:#_1_projectTypeSelectionSpec
+     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page1_projectTypeSelectionSpec
+     ProjectBuilderAssistantApplication new openInterface:#page1_projectTypeSelectionSpec
     "
 
     <resource: #canvas>
 
     ^ 
      #(FullSpec
-        name: #'_1_projectTypeSelectionSpec'
+        name: #'page1_projectTypeSelectionSpec'
         window: 
        (WindowSpec
           label: 'Project Selection'
@@ -160,7 +160,7 @@
       )
 !
 
-_2_projectSelectionSpec
+page2_projectSelectionSpec
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
 
@@ -168,15 +168,15 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#_2_projectSelectionSpec
-     ProjectBuilderAssistantApplication new openInterface:#_2_projectSelectionSpec
+     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page2_projectSelectionSpec
+     ProjectBuilderAssistantApplication new openInterface:#page2_projectSelectionSpec
     "
 
     <resource: #canvas>
 
     ^ 
      #(FullSpec
-        name: #'_2_projectSelectionSpec'
+        name: #'page2_projectSelectionSpec'
         window: 
        (WindowSpec
           label: 'Project Selection'
@@ -277,7 +277,7 @@
       )
 !
 
-_3_applicationSelectionSpec
+page3_applicationSelectionSpec
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
 
@@ -285,15 +285,15 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#_3_applicationSelectionSpec
-     ProjectBuilderAssistantApplication new openInterface:#_3_applicationSelectionSpec
+     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page3_applicationSelectionSpec
+     ProjectBuilderAssistantApplication new openInterface:#page3_applicationSelectionSpec
     "
 
     <resource: #canvas>
 
     ^ 
      #(FullSpec
-        name: #'_3_applicationSelectionSpec'
+        name: #'page3_applicationSelectionSpec'
         window: 
        (WindowSpec
           label: 'Application Selection'
@@ -387,7 +387,7 @@
       )
 !
 
-_4_specifyIncludedClasses
+page4_specifyIncludedClasses
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
 
@@ -395,15 +395,15 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#_4_specifyIncludedClasses
-     ProjectBuilderAssistantApplication new openInterface:#_4_specifyIncludedClasses
+     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page4_specifyIncludedClasses
+     ProjectBuilderAssistantApplication new openInterface:#page4_specifyIncludedClasses
     "
 
     <resource: #canvas>
 
     ^ 
      #(FullSpec
-        name: #'_4_specifyIncludedClasses'
+        name: #'page4_specifyIncludedClasses'
         window: 
        (WindowSpec
           label: 'Project Selection'
@@ -456,7 +456,7 @@
       )
 !
 
-_5_specifyBuildDirectorySpec
+page5_specifyBuildDirectorySpec
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
 
@@ -464,15 +464,15 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#_5_specifyBuildDirectorySpec
-     ProjectBuilderAssistantApplication new openInterface:#_5_specifyBuildDirectorySpec
+     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page5_specifyBuildDirectorySpec
+     ProjectBuilderAssistantApplication new openInterface:#page5_specifyBuildDirectorySpec
     "
 
     <resource: #canvas>
 
     ^ 
      #(FullSpec
-        name: #'_5_specifyBuildDirectorySpec'
+        name: #'page5_specifyBuildDirectorySpec'
         window: 
        (WindowSpec
           label: 'Project Selection'
@@ -509,7 +509,7 @@
       )
 !
 
-_6_buildSpec
+page6_buildSpec
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
 
@@ -517,15 +517,15 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#_6_buildSpec
-     ProjectBuilderAssistantApplication new openInterface:#_6_buildSpec
+     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page6_buildSpec
+     ProjectBuilderAssistantApplication new openInterface:#page6_buildSpec
     "
 
     <resource: #canvas>
 
     ^ 
      #(FullSpec
-        name: #'_6_buildSpec'
+        name: #'page6_buildSpec'
         window: 
        (WindowSpec
           label: 'Project Selection'
@@ -580,7 +580,7 @@
       )
 !
 
-_7_deploySpec
+page7_deploySpec
     "This resource specification was automatically generated
      by the UIPainter of ST/X."
 
@@ -588,15 +588,15 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#_7_deploySpec
-     ProjectBuilderAssistantApplication new openInterface:#_7_deploySpec
+     UIPainter new openOnClass:ProjectBuilderAssistantApplication andSelector:#page7_deploySpec
+     ProjectBuilderAssistantApplication new openInterface:#page7_deploySpec
     "
 
     <resource: #canvas>
 
     ^ 
      #(FullSpec
-        name: #'_7_deploySpec'
+        name: #'page7_deploySpec'
         window: 
        (WindowSpec
           label: 'Project Selection'
@@ -1121,41 +1121,41 @@
     ^ #(Array
         ( AssistantPageSpec
             pageTitle: 'Project Type Selection'
-            windowSpecSelector: _1_projectTypeSelectionSpec
+            windowSpecSelector: page1_projectTypeSelectionSpec
         )
 
         (AssistantPageSpec
             pageTitle: 'Project Selection'
-            windowSpecSelector: _2_projectSelectionSpec
+            windowSpecSelector: page2_projectSelectionSpec
         )
 
         (AssistantPageSpec
             pageTitle: 'Application Selection'
-            windowSpecSelector: _3_applicationSelectionSpec
+            windowSpecSelector: page3_applicationSelectionSpec
             isEnabledQuerySelector: #projectTypeIsNotLibrary
             canEnterQuerySelector: #hasProjectSelected
         )
 
         (AssistantPageSpec
             pageTitle: 'Specify Contents'
-            windowSpecSelector: _4_specifyIncludedClasses
+            windowSpecSelector: page4_specifyIncludedClasses
             enterCallbackSelector: updateListOfClassesInProject
         )
 
         (AssistantPageSpec
             pageTitle: 'Specify Build Directory'
-            windowSpecSelector: _5_specifyBuildDirectorySpec
+            windowSpecSelector: page5_specifyBuildDirectorySpec
         )
 
         (AssistantPageSpec
             pageTitle: 'Build'
-            windowSpecSelector: _6_buildSpec
+            windowSpecSelector: page6_buildSpec
             canEnterQuerySelector: #hasBuildDirectorySpecified
         )
 
         (AssistantPageSpec
             pageTitle: 'Deploy'
-            windowSpecSelector: _7_deploySpec
+            windowSpecSelector: page7_deploySpec
         )
     ) decodeAsLiteralArray.
 ! !