# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1345477225 -7200
# Node ID 8057ed7bccd2b2ec7ce7ae4ad23c2ccd3b10ea0d
# Parent  d02db91a0938c6ddf9978c67d600cbbaeb240084
added: #doBrowseBuildDirectory
changed: #page7_buildSpec

diff -r d02db91a0938 -r 8057ed7bccd2 Tools__ProjectBuilderAssistantApplication.st
--- a/Tools__ProjectBuilderAssistantApplication.st	Mon Aug 20 17:12:51 2012 +0200
+++ b/Tools__ProjectBuilderAssistantApplication.st	Mon Aug 20 17:40:25 2012 +0200
@@ -1244,7 +1244,7 @@
           label: 'Project Selection'
           name: 'Project Selection'
           min: (Point 0 0)
-          bounds: (Rectangle 0 0 521 472)
+          bounds: (Rectangle 0 0 677 472)
         )
         component: 
        (SpecCollection
@@ -1310,6 +1310,17 @@
                     model: doStopMake
                     extent: (Point 107 22)
                   )
+                 (ViewSpec
+                    name: 'Box2'
+                    extent: (Point 20 10)
+                  )
+                 (ActionButtonSpec
+                    label: 'Browse Build Directory'
+                    name: 'Button6'
+                    translateLabel: true
+                    model: doBrowseBuildDirectory
+                    extent: (Point 167 22)
+                  )
                  )
                
               )
@@ -1615,6 +1626,16 @@
     ].
 !
 
+doBrowseBuildDirectory
+    <resource: #uiCallback>
+
+    UserPreferences current fileBrowserClass
+        openIn:projectBuilder packageBuildDirectory asFilename
+"/    projectBuilder packageBuildDirectory asFilename openExplorer
+
+    "Created: / 20-08-2012 / 17:05:54 / cg"
+!
+
 doBrowseProject
     <resource: #uiCallback>