#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Thu, 12 Dec 2019 15:20:06 +0100
changeset 3824 7d83538ca900
parent 3823 fefcdd086a7d
child 3825 0c6e23229b42
#UI_ENHANCEMENT by cg class: Tools::ViewTreeInspectorApplication class added: #defaultIcon changed: #crossHairIcon #windowSpec
Tools__ViewTreeApplication.st
--- a/Tools__ViewTreeApplication.st	Wed Dec 04 04:27:35 2019 +0000
+++ b/Tools__ViewTreeApplication.st	Thu Dec 12 15:20:06 2019 +0100
@@ -195,9 +195,17 @@
 !ViewTreeInspectorApplication class methodsFor:'image specs'!
 
 crossHairIcon
+    <resource: #programImage>
+
     ^ ToolbarIconLibrary bigCrossHairIcon
 !
 
+defaultIcon
+    <resource: #programImage>
+
+    ^ ToolbarIconLibrary viewInspect22x22Icon
+!
+
 lockViewIcon
     "This resource specification was automatically generated
      by the ImageEditor of ST/X."
@@ -268,125 +276,120 @@
 
     <resource: #canvas>
 
-    ^
+    ^ 
     #(FullSpec
        name: windowSpec
-       window:
+       uuid: 'aebcdd46-3384-11b2-a28b-00d861a3d4eb'
+       window: 
       (WindowSpec
-	 label: 'View Tree Inspector'
-	 name: 'View Tree Inspector'
-	 min: (Point 10 10)
-	 max: (Point 1024 9999)
-	 bounds: (Rectangle 0 0 693 643)
-	 menu: menu
-       )
-       component:
+         label: 'View Tree Inspector'
+         name: 'View Tree Inspector'
+         uuid: 'aebcdfb2-3384-11b2-a28b-00d861a3d4eb'
+         min: (Point 10 10) max: (Point 1024 9999) bounds: (Rectangle 0 0 693 643) menu: menu
+         icon: defaultIcon
+      ) component: 
       (SpecCollection
-	 collection: (
-	  (MenuPanelSpec
-	     name: 'toolbarMenu'
-	     layout: (LayoutFrame 0 0.0 0 0 0 1.0 40 0)
-	     menu: toolbarMenu
-	     textDefault: true
-	   )
-	  (VariableVerticalPanelSpec
-	     name: 'VariableVerticalPanel1'
-	     layout: (LayoutFrame 0 0.0 40 0.0 0 1.0 0 1.0)
-	     component:
-	    (SpecCollection
-	       collection: (
-		(ViewSpec
-		   name: 'PathAndListPane'
-		   component:
-		  (SpecCollection
-		     collection: (
-		      (ViewSpec
-			 name: 'PathPane'
-			 layout: (LayoutFrame 0 0 0 0 0 1 25 0)
-			 component:
-			(SpecCollection
-			   collection: (
-			    (InputFieldSpec
-			       name: 'Path'
-			       layout: (LayoutFrame 0 0 0 0 0 1 0 1)
-			       model: path
-			       acceptOnReturn: true
-			       acceptOnTab: true
-			       acceptOnPointerLeave: true
-			       emptyFieldReplacementText: 'No View Selected'
-			     )
-			    )
-
-			 )
-		       )
-		      (HierarchicalListViewSpec
-			 name: 'List'
-			 layout: (LayoutFrame 0 0 25 0 0 1 0 1)
-			 level: 1
-			 model: model
-			 menu: middleButtonMenu
-			 hasHorizontalScrollBar: true
-			 hasVerticalScrollBar: true
-			 miniScrollerHorizontal: true
-			 miniScrollerVertical: false
-			 listModel: listOfItems
-			 multipleSelectOk: true
-			 useIndex: false
-			 highlightMode: label
-			 showLeftIndicators: false
-			 indicatorSelector: indicatorClicked:
-			 useDefaultIcons: false
-			 postBuildCallback: postBuildTree:
-		       )
-		      )
-
-		   )
-		 )
-		(ViewSpec
-		   name: 'Box2'
-		   component:
-		  (SpecCollection
-		     collection: (
-		      (TabViewSpec
-			 name: 'TabHeader1'
-			 layout: (LayoutFrame 0 0.0 0 0 0 1.0 25 0)
-			 model: inspectorModeIndexHolder
-			 menu: inspectorModes
-			 useIndex: true
-			 translateLabel: true
-		       )
-		      (SubCanvasSpec
-			 name: 'Browser'
-			 layout: (LayoutFrame 0 0 26 0 0 1 0 1)
-			 visibilityChannel: browserVisibleHolder
-			 hasHorizontalScrollBar: true
-			 hasVerticalScrollBar: true
-			 majorKey: #'Tools::NewSystemBrowser'
-			 minorKey: singleClassWithoutVariableListBrowserSpec
-			 createNewApplication: true
-			 createNewBuilder: true
-			 postBuildCallback: postBuildBrowserCanvas:
-		       )
-		      (ViewSpec
-			 name: 'Inspector'
-			 layout: (LayoutFrame 0 0 26 0 0 1 0 1)
-			 visibilityChannel: inspectorVisibleHolder
-			 postBuildCallback: postBuildInspectorView:
-			 viewClassName: 'InspectorView'
-		       )
-		      )
-
-		   )
-		 )
-		)
-
-	     )
-	     handles: (Any 0.5 1.0)
-	   )
-	  )
-
-       )
-     )
+         collection: (
+          (MenuPanelSpec
+             name: 'toolbarMenu'
+             layout: (LayoutFrame 0 0.0 0 0 0 1.0 40 0) uuid: 'aebce2fa-3384-11b2-a28b-00d861a3d4eb'
+             menu: toolbarMenu
+             textDefault: true
+          )
+          (VariableVerticalPanelSpec
+             name: 'VariableVerticalPanel1'
+             layout: (LayoutFrame 0 0.0 40 0.0 0 1.0 0 1.0) uuid: 'aebce480-3384-11b2-a28b-00d861a3d4eb'
+             component: 
+            (SpecCollection
+               collection: (
+                (ViewSpec
+                   name: 'PathAndListPane'
+                   uuid: 'aebce5e8-3384-11b2-a28b-00d861a3d4eb'
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (ViewSpec
+                         name: 'PathPane'
+                         layout: (LayoutFrame 0 0 0 0 0 1 25 0) uuid: 'aebce67e-3384-11b2-a28b-00d861a3d4eb'
+                         component: 
+                        (SpecCollection
+                           collection: (
+                            (InputFieldSpec
+                               name: 'Path'
+                               layout: (LayoutFrame 0 0 0 0 0 1 0 1) uuid: 'aebce6ec-3384-11b2-a28b-00d861a3d4eb'
+                               model: path
+                               acceptOnReturn: true
+                               acceptOnTab: true
+                               acceptOnPointerLeave: true
+                               emptyFieldReplacementText: 'No View Selected'
+                            )
+                          )
+                        )
+                      )
+                      (HierarchicalListViewSpec
+                         name: 'List'
+                         layout: (LayoutFrame 0 0 25 0 0 1 0 1) uuid: 'aebce8e0-3384-11b2-a28b-00d861a3d4eb'
+                         level: 1
+                         model: model
+                         menu: middleButtonMenu
+                         hasHorizontalScrollBar: true
+                         hasVerticalScrollBar: true
+                         miniScrollerHorizontal: true
+                         miniScrollerVertical: false
+                         listModel: listOfItems
+                         multipleSelectOk: true
+                         useIndex: false
+                         highlightMode: label
+                         showLeftIndicators: false
+                         indicatorSelector: indicatorClicked:
+                         useDefaultIcons: false
+                         postBuildCallback: postBuildTree:
+                      )
+                    )
+                  )
+                )
+                (ViewSpec
+                   name: 'Box2'
+                   uuid: 'aebceb6a-3384-11b2-a28b-00d861a3d4eb'
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (TabViewSpec
+                         name: 'TabHeader1'
+                         layout: (LayoutFrame 0 0.0 0 0 0 1.0 25 0) uuid: 'aebcebe2-3384-11b2-a28b-00d861a3d4eb'
+                         model: inspectorModeIndexHolder
+                         menu: inspectorModes
+                         useIndex: true
+                         translateLabel: true
+                      )
+                      (SubCanvasSpec
+                         name: 'Browser'
+                         layout: (LayoutFrame 0 0 26 0 0 1 0 1) uuid: 'aebced36-3384-11b2-a28b-00d861a3d4eb'
+                         visibilityChannel: browserVisibleHolder
+                         hasHorizontalScrollBar: true
+                         hasVerticalScrollBar: true
+                         majorKey: #'Tools::NewSystemBrowser'
+                         minorKey: singleClassWithoutVariableListBrowserSpec
+                         createNewApplication: true
+                         createNewBuilder: true
+                         postBuildCallback: postBuildBrowserCanvas:
+                      )
+                      (ViewSpec
+                         name: 'Inspector'
+                         layout: (LayoutFrame 0 0 26 0 0 1 0 1) uuid: 'aebceec6-3384-11b2-a28b-00d861a3d4eb'
+                         visibilityChannel: inspectorVisibleHolder
+                         viewClassName: 'InspectorView'
+                         postBuildCallback: postBuildInspectorView:
+                      )
+                    )
+                  )
+                )
+              )
+            ) handles: (Any 0.5 1.0)
+          )
+        )
+      )
+    )
 ! !
 
 !ViewTreeInspectorApplication class methodsFor:'menu specs'!