Tools__ProjectBuilderAssistantApplication.st
changeset 2960 9b1e724cb318
parent 2959 ab140a3e5eb6
child 2962 5eee09525324
--- a/Tools__ProjectBuilderAssistantApplication.st	Sat Feb 23 14:27:45 2013 +0100
+++ b/Tools__ProjectBuilderAssistantApplication.st	Sun Feb 24 21:23:43 2013 +0100
@@ -1280,7 +1280,7 @@
           label: 'Project Selection'
           name: 'Project Selection'
           min: (Point 0 0)
-          bounds: (Rectangle 0 0 677 472)
+          bounds: (Rectangle 0 0 679 492)
         )
         component: 
        (SpecCollection
@@ -1311,7 +1311,7 @@
             )
            (HorizontalPanelViewSpec
               name: 'HorizontalPanel1'
-              layout: (LayoutFrame 0 0 -60 1 0 1 -30 1)
+              layout: (LayoutFrame 0 0 -90 1 0 1 -60 1)
               horizontalLayout: leftSpace
               verticalLayout: center
               horizontalSpace: 3
@@ -1356,7 +1356,7 @@
             )
            (HorizontalPanelViewSpec
               name: 'HorizontalPanel2'
-              layout: (LayoutFrame 0 0 -30 1 0 1 0 1)
+              layout: (LayoutFrame 0 0 -60 1 0 1 -30 1)
               horizontalLayout: leftSpace
               verticalLayout: center
               horizontalSpace: 3
@@ -1375,7 +1375,7 @@
                   )
                  (ActionButtonSpec
                     label: 'Explorer on Build Directory'
-                    name: 'Button13'
+                    name: 'Button14'
                     activeHelpKey: openExplorer
                     visibilityChannel: osIsWindows
                     translateLabel: true
@@ -1406,6 +1406,29 @@
                
               )
             )
+           (HorizontalPanelViewSpec
+              name: 'HorizontalPanel3'
+              layout: (LayoutFrame 0 0 -30 1 0 1 0 1)
+              horizontalLayout: leftSpace
+              verticalLayout: center
+              horizontalSpace: 3
+              verticalSpace: 3
+              component: 
+             (SpecCollection
+                collection: (
+                 (ActionButtonSpec
+                    label: 'Terminal in Build Directory'
+                    name: 'Button15'
+                    activeHelpKey: openFinder
+                    visibilityChannel: osIsOSX
+                    translateLabel: true
+                    model: doOpenTerminal
+                    extent: (Point 167 22)
+                  )
+                 )
+               
+              )
+            )
            )
          
         )
@@ -1833,6 +1856,15 @@
     "Modified: / 21-07-2012 / 12:29:21 / cg"
 !
 
+doOpenTerminal
+    projectBuilder isNil ifTrue:[ self getProjectBuilder ].
+    projectBuilder buildDirectory isNil ifTrue:[
+        Dialog information:'No build directory yet'.
+        ^  self
+    ].
+    projectBuilder packageBuildDirectory asFilename openTerminal
+!
+
 doStartMake:whichTarget
     <resource: #uiCallback>