diff -r 035c98964c38 -r dc64ad7c0267 UISelectionPanel.st
--- a/UISelectionPanel.st	Wed Jun 04 13:31:50 1997 +0200
+++ b/UISelectionPanel.st	Wed Jun 04 13:32:25 1997 +0200
@@ -226,90 +226,6 @@
 
 !
 
-menuComboSpec
-    "this window spec was automatically generated by the ST/X UIPainter"
-
-    "do not manually edit this - the painter/builder may not be able to
-     handle the specification if its corrupted."
-
-    "
-     UIPainter new openOnClass:UISelectionPanel andSelector:#menuComboSpec
-     UISelectionPanel new openInterface:#menuComboSpec
-    "
-
-    <resource: #canvas>
-
-    ^
-     
-       #(#FullSpec
-          #'window:' 
-           #(#WindowSpec
-              #'name:' 'uIPainterView'
-              #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              #'label:' 'unnamed'
-              #'bounds:' #(#Rectangle 0 0 464 253)
-          )
-          #'component:' 
-           #(#SpecCollection
-              #'collection:' 
-               #(
-                 #(#ComboBoxSpec
-                    #'name:' 'ComboBox'
-                    #'layout:' #(#LayoutFrame 20 0 20 0 123 0 40 0)
-                    #'immediateAccept:' false
-                    #'acceptOnLeave:' true
-                    #'acceptOnReturn:' true
-                    #'acceptOnTab:' true
-                    #'acceptOnLostFocus:' true
-                    #'hasBorder:' false
-                )
-                 #(#ComboListSpec
-                    #'name:' 'ComboList'
-                    #'layout:' #(#LayoutFrame 20 0 51 0 123 0 71 0)
-                    #'tabable:' false
-                )
-                 #(#PopUpListSpec
-                    #'name:' 'PopUpList'
-                    #'layout:' #(#LayoutFrame 145 0 20 0 248 0 42 0)
-                    #'label:' 'PopUpList'
-                )
-                 #(#MenuPanelSpec
-                    #'name:' 'MenuPanel'
-                    #'layout:' #(#LayoutFrame 147 0 67 0 250 0 89 0)
-                )
-                 #(#TabViewSpec
-                    #'name:' 'TabView'
-                    #'layout:' #(#LayoutFrame 269 0 20 0 409 0 56 0)
-                    #'tabWidget:' #Window
-                    #'direction:' #top
-                    #'useIndex:' false
-                    #'fitLastRow:' true
-                    #'moveSelectedRow:' true
-                )
-                 #(#NoteBookViewSpec
-                    #'name:' 'noteBookView'
-                    #'layout:' #(#LayoutFrame 269 0 66 0 409 0 182 0)
-                    #'tabWidget:' #Window
-                    #'direction:' #top
-                    #'useIndex:' false
-                    #'fitLastRow:' true
-                    #'moveSelectedRow:' true
-                    #'level:' 2
-                )
-                 #(#LabelSpec
-                    #'name:' 'label1'
-                    #'layout:' #(#LayoutFrame 147 0 51 0 250 0 67 0)
-                    #'label:' 'MenuPanel'
-                    #'level:' 0
-                    #'adjust:' #center
-                    #'hasCharacterOrientedLabel:' true
-                    #'canUIDrag:' false
-                )
-              )
-          )
-      )
-!
-
 panelSpec
     "this window spec was automatically generated by the ST/X UIPainter"
 
@@ -596,6 +512,96 @@
           )
       )
 
+! !
+
+!UISelectionPanel class methodsFor:'interface specs'!
+
+menuComboSpec
+    "this window spec was automatically generated by the ST/X UIPainter"
+
+    "do not manually edit this - the painter/builder may not be able to
+     handle the specification if its corrupted."
+
+    "
+     UIPainter new openOnClass:UISelectionPanel andSelector:#menuComboSpec
+     UISelectionPanel new openInterface:#menuComboSpec
+    "
+
+    <resource: #canvas>
+
+    ^
+     
+       #(#FullSpec
+          #'window:' 
+           #(#WindowSpec
+              #'name:' 'uIPainterView'
+              #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+              #'label:' 'unnamed'
+              #'bounds:' #(#Rectangle 0 0 464 253)
+          )
+          #'component:' 
+           #(#SpecCollection
+              #'collection:' 
+               #(
+                 #(#ComboBoxSpec
+                    #'name:' 'ComboBox'
+                    #'layout:' #(#LayoutFrame 20 0 20 0 123 0 40 0)
+                    #'immediateAccept:' false
+                    #'acceptOnLeave:' true
+                    #'acceptOnReturn:' true
+                    #'acceptOnTab:' true
+                    #'acceptOnLostFocus:' true
+                    #'hasBorder:' false
+                )
+                 #(#ComboListSpec
+                    #'name:' 'ComboList'
+                    #'layout:' #(#LayoutFrame 20 0 51 0 123 0 71 0)
+                    #'tabable:' false
+                )
+                 #(#PopUpListSpec
+                    #'name:' 'PopUpList'
+                    #'layout:' #(#LayoutFrame 147 0 20 0 250 0 42 0)
+                    #'label:' 'PopUpList'
+                    #'useIndex:' false
+                )
+                 #(#MenuPanelSpec
+                    #'name:' 'MenuPanel'
+                    #'layout:' #(#LayoutFrame 147 0 67 0 250 0 89 0)
+                    #'showSeparatingLines:' false
+                    #'verticalLayout:' true
+                    #'fitFirstPanel:' true
+                )
+                 #(#TabViewSpec
+                    #'name:' 'TabView'
+                    #'layout:' #(#LayoutFrame 269 0 20 0 409 0 56 0)
+                    #'tabWidget:' #Window
+                    #'direction:' #top
+                    #'useIndex:' false
+                    #'fitLastRow:' true
+                    #'moveSelectedRow:' true
+                )
+                 #(#NoteBookViewSpec
+                    #'name:' 'noteBookView'
+                    #'layout:' #(#LayoutFrame 269 0 66 0 409 0 182 0)
+                    #'tabWidget:' #Window
+                    #'direction:' #top
+                    #'useIndex:' false
+                    #'fitLastRow:' true
+                    #'moveSelectedRow:' true
+                    #'level:' 2
+                )
+                 #(#LabelSpec
+                    #'name:' 'label1'
+                    #'layout:' #(#LayoutFrame 147 0 51 0 250 0 67 0)
+                    #'label:' 'MenuPanel'
+                    #'level:' 0
+                    #'adjust:' #center
+                    #'hasCharacterOrientedLabel:' true
+                    #'canUIDrag:' false
+                )
+              )
+          )
+      )
 !
 
 textSpec
@@ -612,14 +618,14 @@
     <resource: #canvas>
 
     ^
-
+     
        #(#FullSpec
           #'window:' 
            #(#WindowSpec
               #'name:' 'uIPainterView'
               #'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
               #'label:' 'unnamed'
-              #'bounds:' #(#Rectangle 0 0 573 264)
+              #'bounds:' #(#Rectangle 0 0 467 207)
           )
           #'component:' 
            #(#SpecCollection
@@ -627,12 +633,17 @@
                #(
                  #(#InputFieldSpec
                     #'name:' 'EditField'
-                    #'layout:' #(#LayoutFrame 20 0 20 0 115 0 42 0)
+                    #'layout:' #(#LayoutFrame 222 0 109 0 401 0 131 0)
                     #'immediateAccept:' true
+                    #'acceptOnLeave:' false
+                    #'acceptOnReturn:' true
+                    #'acceptOnTab:' true
+                    #'acceptOnLostFocus:' false
+                    #'hasBorder:' false
                 )
                  #(#LabelSpec
                     #'name:' 'Text Label'
-                    #'layout:' #(#LayoutFrame 20 0 50 0 115 0 66 0)
+                    #'layout:' #(#LayoutFrame 222 0 138 0 401 0 160 0)
                     #'label:' 'Text Label'
                     #'level:' 0
                     #'adjust:' #center
@@ -640,56 +651,61 @@
                 )
                  #(#TextEditorSpec
                     #'name:' 'EditTextView'
-                    #'layout:' #(#LayoutFrame 130 0 20 0 234 0 100 0)
+                    #'layout:' #(#LayoutFrame 20 0 13 0 199 0 92 0)
+                    #'hasHorizontalScrollBar:' true
+                    #'hasVerticalScrollBar:' true
+                    #'miniScrollerHorizontal:' false
+                    #'miniScrollerVertical:' false
+                )
+                 #(#SequenceViewSpec
+                    #'name:' 'SelectionInListView'
+                    #'layout:' #(#LayoutFrame 222 0 12 0 401 0 91 0)
+                    #'tabable:' false
+                    #'hasHorizontalScrollBar:' true
+                    #'hasVerticalScrollBar:' true
+                    #'miniScrollerHorizontal:' false
+                    #'miniScrollerVertical:' false
+                    #'isMultiSelect:' false
+                    #'useIndex:' false
+                )
+                 #(#HTMLViewSpec
+                    #'name:' 'HTMLView'
+                    #'layout:' #(#LayoutFrame 23 0 109 0 202 0 188 0)
                     #'hasHorizontalScrollBar:' true
                     #'hasVerticalScrollBar:' true
                     #'miniScrollerHorizontal:' false
                     #'miniScrollerVertical:' false
                 )
-                 #(#TextEditorSpec
-                    #'name:' 'EditTextView miniH'
-                    #'layout:' #(#LayoutFrame 246 0 20 0 350 0 100 0)
-                    #'hasHorizontalScrollBar:' true
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' true
-                    #'miniScrollerVertical:' false
-                )
-                 #(#SequenceViewSpec
-                    #'name:' 'SelectionInListView miniH'
-                    #'layout:' #(#LayoutFrame 246 0 116 0 350 0 196 0)
-                    #'hasHorizontalScrollBar:' true
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' true
-                    #'miniScrollerVertical:' false
+                 #(#LabelSpec
+                    #'name:' 'HTMLViewLabel'
+                    #'layout:' #(#LayoutFrame 99 0 169 0 164 0 183 0)
+                    #'label:' 'HTMLView'
+                    #'level:' 0
+                    #'adjust:' #center
+                    #'hasCharacterOrientedLabel:' true
+                    #'canUIDrag:' false
                 )
-                 #(#SequenceViewSpec
-                    #'name:' 'SelectionInListView'
-                    #'layout:' #(#LayoutFrame 130 0 116 0 234 0 196 0)
-                    #'hasHorizontalScrollBar:' true
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' false
-                    #'miniScrollerVertical:' false
+                 #(#LabelSpec
+                    #'name:' 'label1'
+                    #'layout:' #(#LayoutFrame 91 0 73 0 153 0 87 0)
+                    #'label:' 'EditText'
+                    #'level:' 0
+                    #'adjust:' #center
+                    #'hasCharacterOrientedLabel:' true
+                    #'canUIDrag:' false
                 )
-                 #(#TextEditorSpec
-                    #'name:' 'EditTextView noH'
-                    #'layout:' #(#LayoutFrame 364 0 20 0 468 0 100 0)
-                    #'hasHorizontalScrollBar:' false
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' false
-                    #'miniScrollerVertical:' false
-                )
-                 #(#SequenceViewSpec
-                    #'name:' 'scrollableView2'
-                    #'layout:' #(#LayoutFrame 365 0 116 0 469 0 196 0)
-                    #'hasHorizontalScrollBar:' false
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' false
-                    #'miniScrollerVertical:' false
+                 #(#LabelSpec
+                    #'name:' 'label2'
+                    #'layout:' #(#LayoutFrame 297 0 73 0 384 0 87 0)
+                    #'label:' 'SelectionInList'
+                    #'level:' 0
+                    #'adjust:' #center
+                    #'hasCharacterOrientedLabel:' true
+                    #'canUIDrag:' false
                 )
               )
           )
       )
-
 !
 
 viewsSpec
@@ -762,29 +778,10 @@
                     #'hasCharacterOrientedLabel:' true
                     #'canUIDrag:' false
                 )
-                 #(#HTMLViewSpec
-                    #'name:' 'HTMLView'
-                    #'layout:' #(#LayoutFrame 324 0 20 0 449 0 85 0)
-                    #'hasHorizontalScrollBar:' false
-                    #'hasVerticalScrollBar:' true
-                    #'miniScrollerHorizontal:' false
-                    #'miniScrollerVertical:' false
-                )
-                 #(#LabelSpec
-                    #'name:' 'HTMLViewLabel'
-                    #'layout:' #(#LayoutFrame 355 0 25 0 436 0 42 0)
-                    #'label:' 'HTML View'
-                    #'level:' 0
-                    #'adjust:' #center
-                    #'hasCharacterOrientedLabel:' true
-                    #'canUIDrag:' false
-                )
               )
           )
       )
-! !
-
-!UISelectionPanel class methodsFor:'interface specs'!
+!
 
 windowSpec
     "this window spec was automatically generated by the ST/X UIPainter"
@@ -907,6 +904,9 @@
 selection:aValue
     |spec|
 
+    (aValue isNil or:[aValue == 0]) ifTrue:[
+        ^ self
+    ].
     selection ~~ aValue ifTrue:[
         (selection := aValue) notNil ifTrue:[
             selectors size >= aValue ifTrue:[
@@ -1235,5 +1235,4 @@
 
 version
     ^ '$Header$'
-
 ! !