--- a/HierarchicalListEditor.st Wed Feb 26 14:44:26 2003 +0100
+++ b/HierarchicalListEditor.st Fri Feb 28 13:26:25 2003 +0100
@@ -179,108 +179,110 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Hierarchical List Editor'
- #layout: #(#LayoutFrame 223 0 340 0 692 0 669 0)
- #label: 'Hierarchical List Editor'
- #min: #(#Point 450 280)
- #max: #(#Point 1152 900)
- #bounds: #(#Rectangle 223 340 693 670)
- #menu: #menu
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#MenuPanelSpec
- #name: 'menuToolbarView'
- #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 32 0)
- #menu: #menuToolbar
- )
- #(#VariableHorizontalPanelSpec
- #name: 'VariableHorizontalPanel'
- #layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
+ ^
+ #(#FullSpec
+ #name: #windowSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Hierarchical List Editor'
+ #name: 'Hierarchical List Editor'
+ #min: #(#Point 450 280)
+ #max: #(#Point 1152 900)
+ #bounds: #(#Rectangle 16 46 486 376)
+ #menu: #menu
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#MenuPanelSpec
+ #name: 'menuToolbarView'
+ #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 32 0)
+ #menu: #menuToolbar
+ )
+ #(#VariableHorizontalPanelSpec
+ #name: 'VariableHorizontalPanel'
+ #layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#ArbitraryComponentSpec
+ #name: 'TreeView'
+ #menu: #menuEdit
+ #hasHorizontalScrollBar: true
+ #hasVerticalScrollBar: true
+ #miniScrollerHorizontal: true
+ #miniScrollerVertical: true
+ #hasBorder: false
+ #component: #treeView
+ )
+ #(#ViewSpec
+ #name: 'SpecView'
+ #level: -1
#component:
- #(#SpecCollection
- #collection:
- #(
- #(#ArbitraryComponentSpec
- #name: 'TreeView'
- #menu: #menuEdit
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #miniScrollerVertical: true
- #component: #treeView
- #hasBorder: false
- )
- #(#ViewSpec
- #name: 'SpecView'
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'nameLabel'
- #layout: #(#AlignmentOrigin 98 0 26 0 1 0.5)
- #label: 'Label:'
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'labelInputField'
- #layout: #(#LayoutFrame 100 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #label
- #tabable: true
- #model: #itemName
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- #acceptOnLostFocus: true
- )
- #(#LabelSpec
- #name: 'valueLabel'
- #layout: #(#AlignmentOrigin 98 0 52 0 1 0.5)
- #activeHelpKey: #contents
- #label: 'Contents:'
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'valueInputField'
- #layout: #(#LayoutFrame 100 0 41 0 -5 1.0 63 0)
- #activeHelpKey: #contents
- #tabable: true
- #model: #itemValue
- #type: #symbolOrNil
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- #acceptOnLostFocus: true
- )
- #(#UISubSpecification
- #name: 'SubSpecification'
- #layout: #(#LayoutFrame 2 0.0 -26 1.0 -2 1.0 -2 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForCommit
- )
- )
- )
- #level: -1
- )
+ #(#SpecCollection
+ #collection: #(
+ #(#LabelSpec
+ #label: 'Label:'
+ #name: 'nameLabel'
+ #layout: #(#AlignmentOrigin 98 0 26 0 1 0.5)
+ #resizeForLabel: true
+ )
+ #(#InputFieldSpec
+ #name: 'labelInputField'
+ #layout: #(#LayoutFrame 100 0 15 0 -5 1.0 37 0)
+ #activeHelpKey: #label
+ #tabable: true
+ #model: #itemName
+ #acceptOnLeave: true
+ #acceptOnLostFocus: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: true
+ )
+ #(#LabelSpec
+ #label: 'Contents:'
+ #name: 'valueLabel'
+ #layout: #(#AlignmentOrigin 98 0 52 0 1 0.5)
+ #activeHelpKey: #contents
+ #resizeForLabel: true
)
+ #(#InputFieldSpec
+ #name: 'valueInputField'
+ #layout: #(#LayoutFrame 100 0 41 0 -5 1.0 63 0)
+ #activeHelpKey: #contents
+ #tabable: true
+ #model: #itemValue
+ #type: #smalltalkObject
+ #acceptOnLeave: true
+ #acceptOnLostFocus: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: true
+ )
+ #(#UISubSpecification
+ #name: 'SubSpecification'
+ #layout: #(#LayoutFrame 2 0.0 -26 1.0 -2 1.0 -2 1.0)
+ #majorKey: #ToolApplicationModel
+ #minorKey: #windowSpecForCommit
+ )
+ )
+
)
- #handles: #(#Any 0.368421 1.0)
- )
- #(#UISubSpecification
- #name: 'InfoBarSubSpec'
- #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForInfoBar
- )
+ )
+ )
+
)
- )
+ #handles: #(#Any 0.368421 1.0)
+ )
+ #(#UISubSpecification
+ #name: 'InfoBarSubSpec'
+ #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
+ #majorKey: #ToolApplicationModel
+ #minorKey: #windowSpecForInfoBar
+ )
+ )
+
+ )
)
! !