diff -r a4d672240503 -r fe8e1fb37521 AssistantApplication.st --- a/AssistantApplication.st Thu Jan 23 17:11:43 2014 +0100 +++ b/AssistantApplication.st Fri Jan 24 13:48:43 2014 +0100 @@ -132,187 +132,187 @@ ^ - #(FullSpec - name: windowSpec - window: - (WindowSpec - label: 'Assistant' - name: 'Assistant' - bounds: (Rectangle 0 0 534 440) - menu: mainMenu - icon: defaultIcon - ) - component: - (SpecCollection - collection: ( - (ViewSpec - name: 'Box1' - layout: (LayoutFrame 0 0 0 0 0 1 -25 1) - component: - (SpecCollection - collection: ( - (VariableHorizontalPanelSpec - name: 'MainHorizontalPanel' - layout: (LayoutFrame 0 0 0 0 0 1 -40 1) - component: - (SpecCollection - collection: ( - (ViewSpec - name: 'Box2' - component: - (SpecCollection - collection: ( - (VariableVerticalPanelSpec - name: 'VariableVerticalPanel1' - layout: (LayoutFrame 0 0 0 0 0 1 0 1) - component: - (SpecCollection - collection: ( - (SequenceViewSpec - name: 'PagesLabelList' - level: 0 - enableChannel: false - hasHorizontalScrollBar: true - hasVerticalScrollBar: true - miniScrollerHorizontal: true - useIndex: true - sequenceList: pageLabelsInList - ) - (HTMLViewSpec - name: 'HTMLBrowser1' - level: 0 - hasHorizontalScrollBar: true - hasVerticalScrollBar: true - miniScrollerHorizontal: true - miniScrollerVertical: false - htmlText: pageInfoHolder - ) + #(FullSpec + name: windowSpec + window: + (WindowSpec + label: 'Assistant' + name: 'Assistant' + bounds: (Rectangle 0 0 806 608) + menu: mainMenu + icon: defaultIcon + ) + component: + (SpecCollection + collection: ( + (ViewSpec + name: 'Box1' + layout: (LayoutFrame 0 0 0 0 0 1 -25 1) + component: + (SpecCollection + collection: ( + (VariableHorizontalPanelSpec + name: 'MainHorizontalPanel' + layout: (LayoutFrame 0 0 0 0 0 1 -40 1) + component: + (SpecCollection + collection: ( + (ViewSpec + name: 'Box2' + component: + (SpecCollection + collection: ( + (VariableVerticalPanelSpec + name: 'VariableVerticalPanel1' + layout: (LayoutFrame 0 0 0 0 0 1 0 1) + component: + (SpecCollection + collection: ( + (SequenceViewSpec + name: 'PagesLabelList' + level: 0 + enableChannel: false + hasHorizontalScrollBar: true + hasVerticalScrollBar: true + miniScrollerHorizontal: true + useIndex: true + sequenceList: pageLabelsInList ) - - ) - handles: (Any 0.5 1.0) - ) + (HTMLViewSpec + name: 'HTMLBrowser1' + level: 0 + hasHorizontalScrollBar: true + hasVerticalScrollBar: true + miniScrollerHorizontal: true + miniScrollerVertical: false + htmlText: pageInfoHolder + ) + ) + + ) + handles: (Any 0.5 1.0) ) - - ) - ) - (SubCanvasSpec - name: 'SubCanvas1' - hasHorizontalScrollBar: false - hasVerticalScrollBar: false - miniScrollerHorizontal: false - miniScrollerVertical: false - specHolder: currentPageSpecHolder - createNewBuilder: false - ) + ) + + ) + ) + (SubCanvasSpec + name: 'SubCanvas1' + hasHorizontalScrollBar: false + hasVerticalScrollBar: false + miniScrollerHorizontal: false + miniScrollerVertical: false + specHolder: currentPageSpecHolder + createNewBuilder: false ) - - ) - handles: (Any 0.5 1.0) - ) - (HorizontalPanelViewSpec - name: 'TwoPanelsPanel' - layout: (LayoutFrame 0 0 -40 1 0 1 0 1) - horizontalLayout: fit - verticalLayout: fit - horizontalSpace: 3 - verticalSpace: 3 - reverseOrderIfOKAtLeft: true - component: - (SpecCollection - collection: ( - (HorizontalPanelViewSpec - name: 'ButtonPanel2' - horizontalLayout: rightSpaceMax - verticalLayout: center - horizontalSpace: 3 - verticalSpace: 3 - ignoreInvisibleComponents: false - reverseOrderIfOKAtLeft: true - component: - (SpecCollection - collection: ( - (ActionButtonSpec - label: 'Cancel' - name: 'Button8' - visibilityChannel: cancelButtonVisible - translateLabel: true - resizeForLabel: true - model: doCancel - extent: (Point 80 22) - ) - (ActionButtonSpec - label: 'Finish' - name: 'Button7' - visibilityChannel: finishButtonVisible - translateLabel: true - resizeForLabel: true - model: doFinish - enableChannel: finishButtonEnabled - extent: (Point 80 22) - ) + ) + + ) + handles: (Any 0.5 1.0) + ) + (HorizontalPanelViewSpec + name: 'TwoPanelsPanel' + layout: (LayoutFrame 0 0 -40 1 0 1 0 1) + horizontalLayout: fit + verticalLayout: fit + horizontalSpace: 3 + verticalSpace: 3 + reverseOrderIfOKAtLeft: true + component: + (SpecCollection + collection: ( + (HorizontalPanelViewSpec + name: 'ButtonPanel2' + horizontalLayout: rightSpaceMax + verticalLayout: center + horizontalSpace: 3 + verticalSpace: 3 + ignoreInvisibleComponents: false + reverseOrderIfOKAtLeft: true + component: + (SpecCollection + collection: ( + (ActionButtonSpec + label: 'Cancel' + name: 'Button8' + visibilityChannel: cancelButtonVisible + translateLabel: true + resizeForLabel: true + model: doCancel + extent: (Point 80 22) + ) + (ActionButtonSpec + label: 'Finish' + name: 'Button7' + visibilityChannel: finishButtonVisible + translateLabel: true + resizeForLabel: true + model: doFinish + enableChannel: finishButtonEnabled + extent: (Point 80 22) ) - - ) - extent: (Point 265 40) - ) - (HorizontalPanelViewSpec - name: 'ButtonPanel1' - horizontalLayout: centerMax - verticalLayout: center - horizontalSpace: 3 - verticalSpace: 3 - component: - (SpecCollection - collection: ( - (ActionButtonSpec - label: 'Back' - name: 'Button1' - activeHelpKey: backButton - visibilityChannel: backButtonVisible - translateLabel: true - labelChannel: backButtonLabelHolder - model: goBackward - enableChannel: backButtonEnabled - useDefaultExtent: true - ) - (ActionButtonSpec - label: 'Next' - name: 'Button2' - activeHelpKey: nextButton - visibilityChannel: forwardButtonVisible - translateLabel: true - labelChannel: nextButtonLabelHolder - model: goForward - enableChannel: forwardButtonEnabled - useDefaultExtent: true - ) + ) + + ) + extent: (Point 401 40) + ) + (HorizontalPanelViewSpec + name: 'ButtonPanel1' + horizontalLayout: centerMax + verticalLayout: center + horizontalSpace: 3 + verticalSpace: 3 + component: + (SpecCollection + collection: ( + (ActionButtonSpec + label: 'Back' + name: 'Button1' + activeHelpKey: backButton + visibilityChannel: backButtonVisible + translateLabel: true + labelChannel: backButtonLabelHolder + model: goBackward + enableChannel: backButtonEnabled + useDefaultExtent: true ) - - ) - extent: (Point 266 40) - ) + (ActionButtonSpec + label: 'Next' + name: 'Button2' + activeHelpKey: nextButton + visibilityChannel: forwardButtonVisible + translateLabel: true + labelChannel: nextButtonLabelHolder + model: goForward + enableChannel: forwardButtonEnabled + useDefaultExtent: true + ) + ) + + ) + extent: (Point 402 40) ) - - ) - ) + ) + + ) ) - - ) - ) - (LabelSpec - label: 'Label' - name: 'Label1' - layout: (LayoutFrame 1 0 -25 1 -1 1 -1 1) - level: -1 - translateLabel: true - labelChannel: infoHolder - adjust: left - ) + ) + + ) ) - - ) - ) + (LabelSpec + label: 'Label' + name: 'Label1' + layout: (LayoutFrame 1 0 -25 1 -1 1 -1 1) + level: -1 + translateLabel: true + labelChannel: infoHolder + adjust: left + ) + ) + + ) + ) ! ! !AssistantApplication class methodsFor:'menu specs'! @@ -857,10 +857,10 @@ !AssistantApplication class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.26 2013-09-24 20:21:57 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.27 2014-01-24 12:48:43 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.26 2013-09-24 20:21:57 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg2/AssistantApplication.st,v 1.27 2014-01-24 12:48:43 cg Exp $' ! !