Tools__TestRunnerMini.st
changeset 15121 dd8d070f66b0
parent 15119 c4351ba2b224
child 15122 ab2f00b41933
--- a/Tools__TestRunnerMini.st	Fri Jan 30 14:11:22 2015 +0100
+++ b/Tools__TestRunnerMini.st	Fri Jan 30 14:11:56 2015 +0100
@@ -179,142 +179,153 @@
        component: 
       (SpecCollection
          collection: (
-          (HorizontalPanelViewSpec
-             name: 'RunnerInnerBox'
+          (ViewSpec
+             name: 'Box1'
              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
              backgroundChannel: resultBackgroundColorAspect
-             horizontalLayout: rightSpaceFit
-             verticalLayout: topSpace
-             horizontalSpace: 0
-             elementsChangeSize: true
              component: 
             (SpecCollection
                collection: (
-                (ViewSpec
-                   name: 'RunnerInfoBox'
+                (HorizontalPanelViewSpec
+                   name: 'RunnerInnerBox'
+                   layout: (LayoutFrame 0 0 0 0 -2 1 0 1)
                    backgroundChannel: resultBackgroundColorAspect
+                   horizontalLayout: rightSpaceFit
+                   verticalLayout: topSpace
+                   horizontalSpace: 0
+                   elementsChangeSize: true
                    component: 
                   (SpecCollection
                      collection: (
-                      (LabelSpec
-                         label: 'Run tests first!!'
-                         name: 'ResultName'
-                         layout: (LayoutFrame 22 0 0 0 0 1 -10 1)
-                         backgroundChannel: resultBackgroundColorAspect
-                         foregroundColor: (Color 100.0 100.0 100.0)
-                         translateLabel: true
-                         labelChannel: resultNameAspect
-                         adjust: left
-                       )
-                      (ActionButtonSpec
-                         name: 'Button3'
-                         layout: (LayoutFrame 5 0 3 0 21 0 17 0)
-                         activeHelpKey: pin
-                         level: 0
-                         visibilityChannel: pinButtonVisibleHolder
-                         backgroundChannel: resultBackgroundColorAspect
-                         foregroundChannel: resultBackgroundColorAspect
-                         hasCharacterOrientedLabel: false
-                         translateLabel: true
-                         labelChannel: pinIcon
-                         model: pin
-                       )
-                      (LabelSpec
-                         name: 'ResultInfo'
-                         layout: (LayoutFrame 22 0 -10 1 0 1 0 1)
-                         style: (FontDescription helvetica medium roman 8 #'iso10646-1')
-                         backgroundChannel: resultBackgroundColorAspect
-                         foregroundColor: (Color 100.0 100.0 100.0)
-                         translateLabel: true
-                         labelChannel: resultInfoAspect
-                         adjust: left
-                       )
                       (ViewSpec
-                         name: 'ProgressPanel'
-                         layout: (LayoutFrame 0 0 0 0 0 1 0 1)
-                         initiallyInvisible: true
-                         visibilityChannel: progressIndicatorShownHolder
+                         name: 'RunnerInfoBox'
                          backgroundChannel: resultBackgroundColorAspect
                          component: 
                         (SpecCollection
                            collection: (
-                            (ProgressIndicatorSpec
-                               name: 'RunningProgress'
-                               layout: (LayoutFrame 5 0 -10 0.5 -5 1 10 0.5)
-                               model: progressHolder
-                               postBuildCallback: postBuildProgressIndicator:
+                            (LabelSpec
+                               label: 'Run tests first!!'
+                               name: 'ResultName'
+                               layout: (LayoutFrame 22 0 0 0 0 1 -10 1)
+                               backgroundChannel: resultBackgroundColorAspect
+                               foregroundColor: (Color 100.0 100.0 100.0)
+                               translateLabel: true
+                               labelChannel: resultNameAspect
+                               adjust: left
+                             )
+                            (ActionButtonSpec
+                               name: 'Button3'
+                               layout: (LayoutFrame 5 0 3 0 21 0 17 0)
+                               activeHelpKey: pin
+                               level: 0
+                               visibilityChannel: pinButtonVisibleHolder
+                               backgroundChannel: resultBackgroundColorAspect
+                               foregroundChannel: resultBackgroundColorAspect
+                               hasCharacterOrientedLabel: false
+                               translateLabel: true
+                               labelChannel: pinIcon
+                               model: pin
                              )
                             )
                           
                          )
+                         extent: (Point 219 31)
+                       )
+                      (ActionButtonSpec
+                         label: 'Debug'
+                         name: 'DebugButton'
+                         activeHelpKey: debugSelected
+                         translateLabel: true
+                         model: debug
+                         enableChannel: runEnabledHolder
+                         extent: (Point 60 25)
+                       )
+                      (ActionButtonSpec
+                         label: 'Stop'
+                         name: 'Button2'
+                         activeHelpKey: stopRun
+                         visibilityChannel: runningHolder
+                         translateLabel: true
+                         model: stop
+                         extent: (Point 60 25)
+                       )
+                      (ActionButtonSpec
+                         label: 'Run'
+                         name: 'Run'
+                         activeHelpKey: runSelected
+                         visibilityChannel: notRunningHolder
+                         translateLabel: true
+                         model: run
+                         enableChannel: runEnabledHolder
+                         extent: (Point 60 25)
+                       )
+                      (ActionButtonSpec
+                         label: 'Failed'
+                         name: 'Button1'
+                         activeHelpKey: runFailed
+                         visibilityChannel: runFailedButtonVisibleHolder
+                         translateLabel: true
+                         model: runFailed
+                         enableChannel: runFailedEnabledHolder
+                         extent: (Point 60 25)
+                       )
+                      (ActionButtonSpec
+                         label: 'Run All'
+                         name: 'RunAll'
+                         activeHelpKey: runAll
+                         visibilityChannel: runAllButtonVisibleHolder
+                         translateLabel: true
+                         model: runAll
+                         enableChannel: runAllEnabledHolder
+                         extent: (Point 60 25)
+                       )
+                      (ActionButtonSpec
+                         label: 'Coverage'
+                         name: 'Button4'
+                         activeHelpKey: runAllWithCoverage
+                         visibilityChannel: runAllButtonVisibleHolder
+                         translateLabel: true
+                         model: runAllWithCoverage
+                         enableChannel: runAllEnabledHolder
+                         extent: (Point 80 25)
                        )
                       )
                     
                    )
-                   extent: (Point 221 40)
-                 )
-                (ActionButtonSpec
-                   label: 'Debug'
-                   name: 'DebugButton'
-                   activeHelpKey: debugSelected
-                   translateLabel: true
-                   model: debug
-                   enableChannel: runEnabledHolder
-                   extent: (Point 60 25)
+                   postBuildCallback: postBuildRunnerPanel:
                  )
-                (ActionButtonSpec
-                   label: 'Stop'
-                   name: 'Button2'
-                   activeHelpKey: stopRun
-                   visibilityChannel: runningHolder
+                (LabelSpec
+                   name: 'ResultInfo'
+                   layout: (LayoutFrame 0 0 -20 1 0 0.5 0 1)
+                   style: (FontDescription helvetica medium roman 8 #'iso10646-1')
+                   backgroundChannel: resultBackgroundColorAspect
+                   foregroundColor: (Color 100.0 100.0 100.0)
                    translateLabel: true
-                   model: stop
-                   extent: (Point 60 25)
-                 )
-                (ActionButtonSpec
-                   label: 'Run'
-                   name: 'Run'
-                   activeHelpKey: runSelected
-                   visibilityChannel: notRunningHolder
-                   translateLabel: true
-                   model: run
-                   enableChannel: runEnabledHolder
-                   extent: (Point 60 25)
+                   labelChannel: resultInfoAspect
+                   adjust: left
                  )
-                (ActionButtonSpec
-                   label: 'Failed'
-                   name: 'Button1'
-                   activeHelpKey: runFailed
-                   visibilityChannel: runFailedButtonVisibleHolder
-                   translateLabel: true
-                   model: runFailed
-                   enableChannel: runFailedEnabledHolder
-                   extent: (Point 60 25)
-                 )
-                (ActionButtonSpec
-                   label: 'Run All'
-                   name: 'RunAll'
-                   activeHelpKey: runAll
-                   visibilityChannel: runAllButtonVisibleHolder
-                   translateLabel: true
-                   model: runAll
-                   enableChannel: runAllEnabledHolder
-                   extent: (Point 60 25)
-                 )
-                (ActionButtonSpec
-                   label: 'Coverage'
-                   name: 'Button4'
-                   activeHelpKey: runAllWithCoverage
-                   visibilityChannel: runAllButtonVisibleHolder
-                   translateLabel: true
-                   model: runAllWithCoverage
-                   enableChannel: runAllEnabledHolder
-                   extent: (Point 80 25)
+                (ViewSpec
+                   name: 'ProgressPanel'
+                   layout: (LayoutFrame -32 0.5 -17 1 -3 1.0 -5 1)
+                   initiallyInvisible: true
+                   visibilityChannel: progressIndicatorShownHolder
+                   backgroundChannel: resultBackgroundColorAspect
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (ProgressIndicatorSpec
+                         name: 'RunningProgress'
+                         layout: (LayoutFrame 5 0 0 0 -5 1 0 1)
+                         model: progressHolder
+                         postBuildCallback: postBuildProgressIndicator:
+                       )
+                      )
+                    
+                   )
                  )
                 )
               
              )
-             postBuildCallback: postBuildRunnerPanel:
            )
           )
         
@@ -1241,14 +1252,14 @@
 !TestRunnerMini class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunnerMini.st,v 1.5 2015-01-29 19:21:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunnerMini.st,v 1.6 2015-01-30 13:11:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunnerMini.st,v 1.5 2015-01-29 19:21:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TestRunnerMini.st,v 1.6 2015-01-30 13:11:56 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__TestRunnerMini.st,v 1.5 2015-01-29 19:21:53 cg Exp $'
+    ^ '$Id: Tools__TestRunnerMini.st,v 1.6 2015-01-30 13:11:56 cg Exp $'
 ! !