--- a/MethodFinderWindow.st Fri Apr 27 15:07:27 2012 +0200
+++ b/MethodFinderWindow.st Fri Apr 27 15:21:01 2012 +0200
@@ -75,7 +75,7 @@
collection: (
(ViewSpec
name: 'ReceiverArgBox'
- layout: (LayoutFrame 0 0 0 0 0 1 -75 0.5)
+ layout: (LayoutFrame 0 0 0 0 0 1 -100 0.5)
component:
(SpecCollection
collection: (
@@ -117,7 +117,7 @@
miniScrollerVertical: true
autoHideScrollBars: true
hasKeyboardFocusInitially: false
- extent: (Point 87 99)
+ extent: (Point 87 74)
postBuildCallback: receiverWidgetCreated:
)
(VerticalPanelViewSpec
@@ -150,7 +150,7 @@
)
)
- extent: (Point 87 31)
+ extent: (Point 87 23)
)
(ViewSpec
name: 'Box2'
@@ -173,7 +173,7 @@
)
)
- extent: (Point 87 31)
+ extent: (Point 87 22)
)
(ViewSpec
name: 'Box3'
@@ -196,12 +196,12 @@
)
)
- extent: (Point 87 31)
+ extent: (Point 87 23)
)
)
)
- extent: (Point 87 99)
+ extent: (Point 87 74)
)
(WorkspaceSpec
name: 'AnswerEditor'
@@ -212,7 +212,7 @@
miniScrollerVertical: true
autoHideScrollBars: true
hasKeyboardFocusInitially: false
- extent: (Point 88 99)
+ extent: (Point 88 74)
postBuildCallback: messageAnswerWidgetCreated:
)
)
@@ -225,7 +225,7 @@
)
(ViewSpec
name: 'ReceiverArgBoxActionBox'
- layout: (LayoutFrame 0 0 -73 0.5 0 1 -50 0.5)
+ layout: (LayoutFrame 0 0 -98 0.5 0 1 -75 0.5)
component:
(SpecCollection
collection: (
@@ -250,20 +250,20 @@
)
(ViewSpec
name: 'MatchActionBox'
- layout: (LayoutFrame 0 0 -50 0.5 0 1 0 0.5)
+ layout: (LayoutFrame 0 0 -70 0.5 0 1 -20 0.5)
component:
(SpecCollection
collection: (
(LabelSpec
label: 'Selector Pattern:'
name: 'Label1'
- layout: (LayoutFrame 0 0 -25 0.5 0 0.5 0 0.5)
+ layout: (LayoutFrame 0 0 0 0 0 0.5 25 0)
translateLabel: true
adjust: left
)
(InputFieldSpec
name: 'EntryField1'
- layout: (LayoutFrame 0 0 -25 1 0 0.5 0 1)
+ layout: (LayoutFrame 0 0 -25 1 0 0.5 -5 1)
model: selectorPattern
immediateAccept: true
acceptOnReturn: true
@@ -284,7 +284,7 @@
)
(SequenceViewSpec
name: 'ResultList'
- layout: (LayoutFrame 0 0 0 0.5 0 1 0 1)
+ layout: (LayoutFrame 0 0 -15 0.5 0 1 0 1)
hasHorizontalScrollBar: true
hasVerticalScrollBar: true
autoHideScrollBars: true
@@ -853,13 +853,18 @@
(holder := builder bindingAt:#resultHolder) isNil ifTrue:[
holder := ValueHolder new.
builder aspectAt:#resultHolder put:holder.
- holder value:#('Please enter combination of'
- ' receiver, arg and result'
- ' into the above fields, then click on "search".').
+ holder value:{
+ 'Please enter combination of' .
+ ' ',('receiver, arg and result' allBold) .
+ 'or a'.
+ ' ',('selector search pattern' allBold) .
+ 'into the above fields,'.
+ 'then click on either ',('"search"' allBold),'-button.'
+ }
].
^ holder.
- "Modified: / 27-04-2012 / 14:25:33 / cg"
+ "Modified: / 27-04-2012 / 15:14:32 / cg"
!
selectedClassOfResultHolder