class: Tools::NewSystemBrowser
authorClaus Gittinger <cg@exept.de>
Sun, 10 May 2015 01:16:39 +0200
changeset 15628 7b189258caf1
parent 15627 3f97524378ac
child 15629 1adff41f5fd0
child 15630 903745e4c780
class: Tools::NewSystemBrowser changed: #noteBookWindowSpec
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Sat May 09 21:15:24 2015 +0200
+++ b/Tools__NewSystemBrowser.st	Sun May 10 01:16:39 2015 +0200
@@ -3376,119 +3376,120 @@
 
     <resource: #canvas>
 
-    ^
-     #(FullSpec
-        name: noteBookWindowSpec
-        window:
-       (WindowSpec
-          label: 'NewSystemBrowser'
-          name: 'NewSystemBrowser'
-          min: (Point 0 0)
-          bounds: (Rectangle 0 0 800 700)
-          menu: mainMenu
-          icon: defaultIcon
-        )
-        component:
-       (SpecCollection
-          collection: (
-           (NoteBookViewSpec
-              name: 'NoteBook'
-              layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              level: 0
-              model: selectedBuffer
-              menu: bufferNameList
-              useIndex: true
-              valueChangeSelector: bufferSelectionChanged
-              accessTabMenuAction: tabMenu:
-              hasScrollButtons: true
-              destroyTabAction: destroyTab:
-              canvas: browserCanvas
-              canvasInset: 0
-              keepCanvasAlive: true
-              tabLevel: 1
-              translateLabel: false
-            )
-           (ViewSpec
-              name: 'ToolBar'
-              layout: (LayoutFrame 0 0 0 0 0 1 40 0)
-              visibilityChannel: toolBarVisibleHolder
-              component:
-             (SpecCollection
-                collection: (
-                 (ActionButtonSpec
-                    label: 'hideToolBarIcon'
-                    name: 'HideToolBarButton'
-                    layout: (LayoutFrame 0 0 0 0 13 0 0 1)
-                    activeHelpKey: hideToolBar
-                    hasCharacterOrientedLabel: false
-                    translateLabel: true
-                    model: hideToolbar
-                    postBuildCallback: hideToolBarButtonCreated:
-                  )
-                 (MenuPanelSpec
-                    name: 'ToolBarMenu'
-                    layout: (LayoutFrame 13 0.0 0 0.0 -250 1.0 0 1.0)
-                    visibilityChannel: toolBarVisibleHolder
-                    menu: toolBarMenu
-                    textDefault: true
-                  )
-                 (UISubSpecification
-                    name: 'SubSpecification1'
-                    layout: (LayoutFrame -250 1 0 0 0 1 0 1)
-                    minorKey: searchSpec
-                  )
-                 )
-
-              )
-            )
-           (ViewSpec
-              name: 'BookmarkBar'
-              layout: (LayoutFrame 0 0 40 0 0 1 67 0)
-              visibilityChannel: bookmarkBarVisibleHolder
-              component:
-             (SpecCollection
-                collection: (
-                 (ActionButtonSpec
-                    label: 'hideToolBarIcon'
-                    name: 'Button1'
-                    layout: (LayoutFrame 0 0 0 0 13 0 0 1)
-                    activeHelpKey: hideBookmarkBar
-                    hasCharacterOrientedLabel: false
-                    translateLabel: true
-                    model: hideBookmarkBar
-                    postBuildCallback: hideToolBarButtonCreated:
-                  )
-                 (SubCanvasSpec
-                    name: 'Bookmarks'
-                    layout: (LayoutFrame 13 0 2 0 0 1 -1 1)
-                    level: 0
-                    hasHorizontalScrollBar: false
-                    hasVerticalScrollBar: false
-                    miniScrollerHorizontal: false
-                    majorKey: BookmarkBar
-                    subAspectHolders:
-                   (Array
-
-                     (SubChannelInfoSpec
-                        subAspect: bookmarkHolder
-                        aspect: bookmarkHolder
-                      )
-                     (SubChannelInfoSpec
-                        subAspect: bookmarksHolder
-                        aspect: bookmarkListHolder
-                      )
-                    )
-                    createNewApplication: true
-                    createNewBuilder: true
-                  )
-                 )
-
-              )
-            )
-           )
-
-        )
-      )
+    ^ 
+    #(FullSpec
+       name: noteBookWindowSpec
+       window: 
+      (WindowSpec
+         label: 'NewSystemBrowser'
+         name: 'NewSystemBrowser'
+         min: (Point 0 0)
+         bounds: (Rectangle 0 0 800 700)
+         menu: mainMenu
+         icon: defaultIcon
+       )
+       component: 
+      (SpecCollection
+         collection: (
+          (NoteBookViewSpec
+             name: 'NoteBook'
+             layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+             level: 0
+             model: selectedBuffer
+             menu: bufferNameList
+             useIndex: true
+             valueChangeSelector: bufferSelectionChanged
+             accessTabMenuAction: tabMenu:
+             translateLabel: false
+             hasScrollButtons: true
+             destroyTabAction: destroyTab:
+             "/ addTabAction: createBuffer
+             canvas: browserCanvas
+             canvasInset: 0
+             keepCanvasAlive: true
+             tabLevel: 1
+           )
+          (ViewSpec
+             name: 'ToolBar'
+             layout: (LayoutFrame 0 0 0 0 0 1 40 0)
+             visibilityChannel: toolBarVisibleHolder
+             component: 
+            (SpecCollection
+               collection: (
+                (ActionButtonSpec
+                   label: 'hideToolBarIcon'
+                   name: 'HideToolBarButton'
+                   layout: (LayoutFrame 0 0 0 0 13 0 0 1)
+                   activeHelpKey: hideToolBar
+                   hasCharacterOrientedLabel: false
+                   translateLabel: true
+                   model: hideToolbar
+                   postBuildCallback: hideToolBarButtonCreated:
+                 )
+                (MenuPanelSpec
+                   name: 'ToolBarMenu'
+                   layout: (LayoutFrame 13 0.0 0 0.0 -250 1.0 0 1.0)
+                   visibilityChannel: toolBarVisibleHolder
+                   menu: toolBarMenu
+                   textDefault: true
+                 )
+                (UISubSpecification
+                   name: 'SubSpecification1'
+                   layout: (LayoutFrame -250 1 0 0 0 1 0 1)
+                   minorKey: searchSpec
+                 )
+                )
+              
+             )
+           )
+          (ViewSpec
+             name: 'BookmarkBar'
+             layout: (LayoutFrame 0 0 40 0 0 1 67 0)
+             visibilityChannel: bookmarkBarVisibleHolder
+             component: 
+            (SpecCollection
+               collection: (
+                (ActionButtonSpec
+                   label: 'hideToolBarIcon'
+                   name: 'Button1'
+                   layout: (LayoutFrame 0 0 0 0 13 0 0 1)
+                   activeHelpKey: hideBookmarkBar
+                   hasCharacterOrientedLabel: false
+                   translateLabel: true
+                   model: hideBookmarkBar
+                   postBuildCallback: hideToolBarButtonCreated:
+                 )
+                (SubCanvasSpec
+                   name: 'Bookmarks'
+                   layout: (LayoutFrame 13 0 2 0 0 1 -1 1)
+                   level: 0
+                   hasHorizontalScrollBar: false
+                   hasVerticalScrollBar: false
+                   miniScrollerHorizontal: false
+                   majorKey: BookmarkBar
+                   subAspectHolders: 
+                  (Array
+                     
+                    (SubChannelInfoSpec
+                       subAspect: bookmarkHolder
+                       aspect: bookmarkHolder
+                     ) 
+                    (SubChannelInfoSpec
+                       subAspect: bookmarksHolder
+                       aspect: bookmarkListHolder
+                     )
+                   )
+                   createNewApplication: true
+                   createNewBuilder: true
+                 )
+                )
+              
+             )
+           )
+          )
+        
+       )
+     )
 !
 
 pagedWindowSpec
@@ -62439,11 +62440,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2221 2015-05-09 19:15:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2222 2015-05-09 23:16:39 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2221 2015-05-09 19:15:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2222 2015-05-09 23:16:39 cg Exp $'
 !
 
 version_HG
@@ -62452,7 +62453,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2221 2015-05-09 19:15:24 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2222 2015-05-09 23:16:39 cg Exp $'
 ! !