# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1463081665 -7200
# Node ID 1663b107709f2be8d1d2fcc722fd68a6a26c0fd6
# Parent  0df87ed0b795ef0c9acfbe620526aa28e9e22961
#DOCUMENTATION by cg
class: MethodFinderWindow
added: #windowSpec_old
changed: #windowSpec

diff -r 0df87ed0b795 -r 1663b107709f MethodFinderWindow.st
--- a/MethodFinderWindow.st	Thu May 12 18:08:42 2016 +0200
+++ b/MethodFinderWindow.st	Thu May 12 21:34:25 2016 +0200
@@ -171,6 +171,344 @@
       (WindowSpec
          label: 'MethodFinder'
          name: 'MethodFinder'
+         bounds: (Rectangle 0 0 816 738)
+         menu: menu
+         icon: defaultIcon
+       )
+       component: 
+      (SpecCollection
+         collection: (
+          (VariableHorizontalPanelSpec
+             name: 'VariableHorizontalPanel1'
+             layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+             showHandle: true
+             snapMode: both
+             component: 
+            (SpecCollection
+               collection: (
+                (VariableVerticalPanelSpec
+                   name: 'LeftBox'
+                   showHandle: true
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (ViewSpec
+                         name: 'MethodFinderBox'
+                         component: 
+                        (SpecCollection
+                           collection: (
+                            (ViewSpec
+                               name: 'ReceiverArgBox'
+                               layout: (LayoutFrame 0 0 0 0 0 1 -30 1)
+                               component: 
+                              (SpecCollection
+                                 collection: (
+                                  (LabelSpec
+                                     label: 'Receiver'
+                                     name: 'ReceiverLabel'
+                                     layout: (LayoutFrame 0 0 0 0 0 0.34000000000000002 28 0)
+                                     translateLabel: true
+                                   )
+                                  (ComboListSpec
+                                     name: 'allowedArgments'
+                                     layout: (LayoutFrame 0 0.34000000000000002 1 0 0 0.64000000000000135 28 0)
+                                     activeHelpKey: argumentCount
+                                     model: argCountHolder
+                                     comboList: argCountList
+                                     useIndex: true
+                                   )
+                                  (LabelSpec
+                                     label: 'Answer'
+                                     name: 'MessageAnswerLabel'
+                                     layout: (LayoutFrame 0 0.64000000000000135 0 0 0 1 28 0)
+                                     activeHelpKey: arg1Value
+                                     translateLabel: true
+                                   )
+                                  (HorizontalPanelViewSpec
+                                     name: 'HorizontalPanel1'
+                                     layout: (LayoutFrame 0 0 30 0 0 1 0 1)
+                                     horizontalLayout: fit
+                                     verticalLayout: fit
+                                     horizontalSpace: 3
+                                     verticalSpace: 3
+                                     component: 
+                                    (SpecCollection
+                                       collection: (
+                                        (WorkspaceSpec
+                                           name: 'ReceiverEditor'
+                                           activeHelpKey: receiverValue
+                                           tabable: true
+                                           hasHorizontalScrollBar: true
+                                           hasVerticalScrollBar: true
+                                           miniScrollerHorizontal: true
+                                           miniScrollerVertical: true
+                                           autoHideScrollBars: true
+                                           hasKeyboardFocusInitially: false
+                                           extent: (Point 85 142)
+                                           postBuildCallback: receiverWidgetCreated:
+                                         )
+                                        (VerticalPanelViewSpec
+                                           name: 'VerticalPanel1'
+                                           horizontalLayout: fit
+                                           verticalLayout: fit
+                                           horizontalSpace: 3
+                                           verticalSpace: 3
+                                           component: 
+                                          (SpecCollection
+                                             collection: (
+                                              (ViewSpec
+                                                 name: 'Box1'
+                                                 visibilityChannel: arg1BoxVisible
+                                                 component: 
+                                                (SpecCollection
+                                                   collection: (
+                                                    (WorkspaceSpec
+                                                       name: 'Arg1Editor'
+                                                       layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+                                                       activeHelpKey: arg1Value
+                                                       tabable: true
+                                                       hasHorizontalScrollBar: true
+                                                       hasVerticalScrollBar: true
+                                                       miniScrollerHorizontal: true
+                                                       miniScrollerVertical: true
+                                                       autoHideScrollBars: true
+                                                       hasKeyboardFocusInitially: false
+                                                       postBuildCallback: argument1WidgetCreated:
+                                                     )
+                                                    )
+                                                  
+                                                 )
+                                                 extent: (Point 86 45)
+                                               )
+                                              (ViewSpec
+                                                 name: 'Box2'
+                                                 visibilityChannel: arg2BoxVisible
+                                                 component: 
+                                                (SpecCollection
+                                                   collection: (
+                                                    (WorkspaceSpec
+                                                       name: 'TextEditor5'
+                                                       layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+                                                       activeHelpKey: arg2Value
+                                                       tabable: true
+                                                       hasHorizontalScrollBar: true
+                                                       hasVerticalScrollBar: true
+                                                       miniScrollerHorizontal: true
+                                                       miniScrollerVertical: true
+                                                       autoHideScrollBars: true
+                                                       hasKeyboardFocusInitially: false
+                                                       postBuildCallback: argument2WidgetCreated:
+                                                     )
+                                                    )
+                                                  
+                                                 )
+                                                 extent: (Point 86 46)
+                                               )
+                                              (ViewSpec
+                                                 name: 'Box3'
+                                                 visibilityChannel: arg3BoxVisible
+                                                 component: 
+                                                (SpecCollection
+                                                   collection: (
+                                                    (WorkspaceSpec
+                                                       name: 'TextEditor6'
+                                                       layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+                                                       activeHelpKey: arg3Value
+                                                       tabable: true
+                                                       hasHorizontalScrollBar: true
+                                                       hasVerticalScrollBar: true
+                                                       miniScrollerHorizontal: true
+                                                       miniScrollerVertical: true
+                                                       autoHideScrollBars: true
+                                                       hasKeyboardFocusInitially: false
+                                                       postBuildCallback: argument3WidgetCreated:
+                                                     )
+                                                    )
+                                                  
+                                                 )
+                                                 extent: (Point 86 45)
+                                               )
+                                              )
+                                            
+                                           )
+                                           extent: (Point 86 142)
+                                         )
+                                        (WorkspaceSpec
+                                           name: 'AnswerEditor'
+                                           activeHelpKey: answerValue
+                                           tabable: true
+                                           hasHorizontalScrollBar: true
+                                           hasVerticalScrollBar: true
+                                           miniScrollerHorizontal: true
+                                           miniScrollerVertical: true
+                                           autoHideScrollBars: true
+                                           hasKeyboardFocusInitially: false
+                                           extent: (Point 86 142)
+                                           postBuildCallback: messageAnswerWidgetCreated:
+                                         )
+                                        )
+                                      
+                                     )
+                                   )
+                                  )
+                                
+                               )
+                             )
+                            (ViewSpec
+                               name: 'ReceiverArgBoxActionBox'
+                               layout: (LayoutFrame 0 0 -30 1 0 1 0 1)
+                               component: 
+                              (SpecCollection
+                                 collection: (
+                                  (ActionButtonSpec
+                                     label: 'Clear'
+                                     name: 'Button2'
+                                     layout: (LayoutFrame 5 0 0 0 -5 0.5 0 1)
+                                     activeHelpKey: clearButton
+                                     translateLabel: true
+                                     model: clear
+                                   )
+                                  (ActionButtonSpec
+                                     label: 'Search'
+                                     name: 'Button1'
+                                     layout: (LayoutFrame 5 0.5 0 0 -5 1 0 1)
+                                     activeHelpKey: startSearchButton
+                                     translateLabel: true
+                                     tabable: true
+                                     model: search
+                                   )
+                                  )
+                                
+                               )
+                             )
+                            )
+                          
+                         )
+                       )
+                      (ViewSpec
+                         name: 'SelectorFinderBox'
+                         component: 
+                        (SpecCollection
+                           collection: (
+                            (ViewSpec
+                               name: 'MatchActionBox'
+                               layout: (LayoutFrame 0 0 0 0 0 1 90 0)
+                               component: 
+                              (SpecCollection
+                                 collection: (
+                                  (LabelSpec
+                                     label: 'Selector Pattern:'
+                                     name: 'Label1'
+                                     layout: (LayoutFrame 0 0 0 0 0 0.5 25 0)
+                                     translateLabel: true
+                                     adjust: left
+                                   )
+                                  (InputFieldSpec
+                                     name: 'EntryField1'
+                                     layout: (LayoutFrame 2 0 -54 1 -2 1 -29 1)
+                                     model: selectorPatternHolder
+                                     immediateAccept: true
+                                     acceptOnReturn: true
+                                     acceptOnTab: true
+                                     acceptOnPointerLeave: true
+                                   )
+                                  (ActionButtonSpec
+                                     label: 'Search'
+                                     name: 'Button4'
+                                     layout: (LayoutFrame 5 0.5 -25 1 -5 1 0 1)
+                                     translateLabel: true
+                                     tabable: true
+                                     model: searchPatternMatchesInBackground
+                                   )
+                                  )
+                                
+                               )
+                             )
+                            (SequenceViewSpec
+                               name: 'ResultList'
+                               layout: (LayoutFrame 0 0 94 0 0 1 0 1)
+                               model: selectedImplementorsHolder
+                               menu: resultListMenu
+                               hasHorizontalScrollBar: true
+                               hasVerticalScrollBar: true
+                               autoHideScrollBars: true
+                               useIndex: true
+                               sequenceList: resultHolder
+                             )
+                            )
+                          
+                         )
+                       )
+                      )
+                    
+                   )
+                   handles: (Any 0.28000000000000003 1.0)
+                 )
+                (VariableVerticalPanelSpec
+                   name: 'RightBox'
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (SequenceViewSpec
+                         name: 'List2'
+                         model: selectedClassOfResultHolder
+                         menu: implementorListMenu
+                         hasHorizontalScrollBar: true
+                         hasVerticalScrollBar: true
+                         autoHideScrollBars: true
+                         doubleClickSelector: openBrowserOn:
+                         valueChangeSelector: selectedClassOfResultHolderChanged
+                         useIndex: false
+                         sequenceList: classOfResultHolder
+                       )
+                      (CodeViewSpec
+                         name: 'CodeView'
+                         model: codeHolder
+                         hasHorizontalScrollBar: true
+                         hasVerticalScrollBar: true
+                         autoHideScrollBars: true
+                         hasKeyboardFocusInitially: false
+                         postBuildCallback: sourceCodeWidgetCreated:
+                         viewClassName: 'codeViewClass'
+                       )
+                      )
+                    
+                   )
+                   handles: (Any 0.23999999999999999 1.0)
+                 )
+                )
+              
+             )
+             handles: (Any 0.33000000000000002 1.0)
+           )
+          )
+        
+       )
+     )
+!
+
+windowSpec_old
+    "This resource specification was automatically generated
+     by the UIPainter of ST/X."
+
+    "Do not manually edit this!! If it is corrupted,
+     the UIPainter may not be able to read the specification."
+
+    "
+     UIPainter new openOnClass:MethodFinderWindow andSelector:#windowSpec
+     MethodFinderWindow new openInterface:#windowSpec
+     MethodFinderWindow open
+    "
+
+    <resource: #canvas>
+
+    ^ 
+    #(FullSpec
+       name: windowSpec
+       window: 
+      (WindowSpec
+         label: 'MethodFinder'
+         name: 'MethodFinder'
          bounds: (Rectangle 0 0 920 690)
          menu: menu
          icon: defaultIcon