Tools__NavigatorCanvas.st
changeset 15441 db99d6ea85ad
parent 15433 629ef97fdd3f
child 15566 184cea584be5
child 16532 2f9e7091b4b5
--- a/Tools__NavigatorCanvas.st	Thu Feb 26 10:58:40 2015 +0100
+++ b/Tools__NavigatorCanvas.st	Fri Feb 27 01:02:09 2015 +0100
@@ -4426,59 +4426,74 @@
        component: 
       (SpecCollection
          collection: (
-          (SubCanvasSpec
-             name: 'ProtocolAndMethodListCanvas'
+          (VerticalPanelViewSpec
+             name: 'VerticalPanel1'
              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
-             hasHorizontalScrollBar: false
-             hasVerticalScrollBar: false
-             majorKey: #'Tools::NavigatorCanvas'
-             minorKey: #'protocolAndMethodListSpec_Both'
-             specHolder: organizerProtocolAndMethodListSpecHolder
-             subAspectHolders: 
-            (Array
-               
-              (SubChannelInfoSpec
-                 subAspect: environmentHolder
-                 aspect: environmentHolder
-               )
+             horizontalLayout: fit
+             verticalLayout: bottomFit
+             horizontalSpace: 3
+             verticalSpace: 3
+             component: 
+            (SpecCollection
+               collection: (
+                (SubCanvasSpec
+                   name: 'ProtocolAndMethodListCanvas'
+                   hasHorizontalScrollBar: false
+                   hasVerticalScrollBar: false
+                   majorKey: #'Tools::NavigatorCanvas'
+                   minorKey: #'protocolAndMethodListSpec_Both'
+                   specHolder: organizerProtocolAndMethodListSpecHolder
+                   subAspectHolders: 
+                  (Array
+                     
+                    (SubChannelInfoSpec
+                       subAspect: environmentHolder
+                       aspect: environmentHolder
+                     )
+                   )
+                   createNewBuilder: false
+                   extent: (Point 498 456)
+                 )
+                (SubCanvasSpec
+                   name: 'TestRunnerEmbedded'
+                   initiallyInvisible: true
+                   visibilityChannel: testRunnerVisibleHolder
+                   hasHorizontalScrollBar: false
+                   hasVerticalScrollBar: false
+                   majorKey: #'Tools::TestRunnerEmbedded'
+                   subAspectHolders: 
+                  (Array
+                     
+                    (SubChannelInfoSpec
+                       subAspect: infoHolder
+                       aspect: infoLabelHolder
+                     ) 
+                    (SubChannelInfoSpec
+                       subAspect: methodGeneratorHolder
+                       aspect: selectorListGenerator
+                     )
+                     
+                    (SubChannelInfoSpec
+                       subAspect: selectedClassesHolder
+                       aspect: selectedClasses
+                     ) 
+                    (SubChannelInfoSpec
+                       subAspect: selectedMethodsHolder
+                       aspect: selectedMethods
+                     )
+                     
+                    (SubChannelInfoSpec
+                       subAspect: selectedProtocolsHolder
+                       aspect: selectedProtocols
+                     )
+                   )
+                   createNewApplication: true
+                   createNewBuilder: true
+                   extent: (Point 498 50)
+                 )
+                )
+              
              )
-             createNewBuilder: false
-           )
-          (SubCanvasSpec
-             name: 'TestRunnerEmbedded'
-             layout: (LayoutFrame 0 0 -50 1 0 1 0 1)
-             initiallyInvisible: true
-             hasHorizontalScrollBar: false
-             hasVerticalScrollBar: false
-             majorKey: #'Tools::TestRunnerEmbedded'
-             subAspectHolders: 
-            (Array
-               
-              (SubChannelInfoSpec
-                 subAspect: methodGeneratorHolder
-                 aspect: selectorListGenerator
-               ) 
-              (SubChannelInfoSpec
-                 subAspect: selectedClassesHolder
-                 aspect: selectedClasses
-               )
-               
-              (SubChannelInfoSpec
-                 subAspect: selectedMethodsHolder
-                 aspect: selectedMethods
-               ) 
-              (SubChannelInfoSpec
-                 subAspect: selectedProtocolsHolder
-                 aspect: selectedProtocols
-               )
-               
-              (SubChannelInfoSpec
-                 subAspect: infoHolder
-                 aspect: infoLabelHolder
-               )
-             )
-             createNewApplication: true
-             createNewBuilder: true
            )
           )
         
@@ -7484,6 +7499,6 @@
 !NavigatorCanvas class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigatorCanvas.st,v 1.25 2015-02-26 02:38:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigatorCanvas.st,v 1.26 2015-02-27 00:02:09 cg Exp $'
 ! !