diff -r 7fd86e9a6a11 -r 1d0ff67419fc UIPainter.st
--- a/UIPainter.st	Fri Apr 23 19:52:40 1999 +0200
+++ b/UIPainter.st	Sat Apr 24 17:46:36 1999 +0200
@@ -687,167 +687,172 @@
 
     <resource: #canvas>
 
-    ^
-
-       #(#FullSpec
-          #window: 
-           #(#WindowSpec
-              #name: 'GUI Painter'
-              #layout: #(#LayoutFrame 134 0 100 0 653 0 601 0)
-              #label: 'GUI Painter'
-              #min: #(#Point 560 460)
-              #max: #(#Point 1160 870)
-              #bounds: #(#Rectangle 134 100 754 602)
-              #menu: #menu
-              #usePreferredExtent: false
-          )
-          #component: 
-           #(#SpecCollection
-              #collection: 
-               #(
-                 #(#MenuPanelSpec
-                    #name: 'menuToolbarView'
-                    #layout: #(#LayoutFrame 0 0.0 0 0 0 1.0 32 0)
+    ^ 
+     #(#FullSpec
+        #name: #windowSpec
+        #window: 
+       #(#WindowSpec
+          #label: 'GUI Painter'
+          #name: 'GUI Painter'
+          #layout: #(#LayoutFrame 647 0 498 0 1266 0 999 0)
+          #level: 0
+          #min: #(#Point 560 460)
+          #max: #(#Point 1160 870)
+          #bounds: #(#Rectangle 647 498 1267 1000)
+          #menu: #menu
+          #usePreferredExtent: false
+          #returnIsOKInDialog: true
+          #escapeIsCancelInDialog: true
+        )
+        #component: 
+       #(#SpecCollection
+          #collection: #(
+           #(#MenuPanelSpec
+              #name: 'menuToolbarView'
+              #layout: #(#LayoutFrame 0 0.0 0 0 0 1.0 32 0)
+              #tabable: true
+              #menu: #menuToolbar
+            )
+           #(#VariableHorizontalPanelSpec
+              #name: 'hpanel'
+              #layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
+              #level: 1
+              #handles: #(#Any 0.318868 1.0)
+              #component: 
+             #(#SpecCollection
+                #collection: #(
+                 #(#ArbitraryComponentSpec
+                    #name: 'treeView'
                     #tabable: true
-                    #menu: #menuToolbar
-                )
-                 #(#VariableHorizontalPanelSpec
-                    #name: 'hpanel'
-                    #layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
+                    #menu: #menuEdit
+                    #hasHorizontalScrollBar: true
+                    #hasVerticalScrollBar: true
+                    #miniScrollerHorizontal: true
+                    #miniScrollerVertical: true
+                    #hasBorder: false
+                    #component: #treeView
+                  )
+                 #(#ViewSpec
+                    #name: 'specHolderView'
+                    #borderWidth: 1
                     #component: 
-                     #(#SpecCollection
-                        #collection: 
-                         #(
-                           #(#ArbitraryComponentSpec
-                              #name: 'treeView'
-                              #tabable: true
-                              #menu: #menuEdit
-                              #hasHorizontalScrollBar: true
-                              #hasVerticalScrollBar: true
-                              #miniScrollerHorizontal: true
-                              #miniScrollerVertical: true
-                              #component: #treeView
-                              #hasBorder: false
-                          )
-                           #(#ViewSpec
-                              #name: 'specHolderView'
-                              #component: 
-                               #(#SpecCollection
-                                  #collection: 
-                                   #(
-                                     #(#MenuPanelSpec
-                                        #name: 'menuToolbar2View'
-                                        #layout: #(#LayoutFrame -1 0.0 -2 0 -1 1.0 30 0)
-                                        #enableChannel: #canMoveOrAlignSelection
-                                        #tabable: true
-                                        #menu: #menuToolbar2
-                                    )
-                                     #(#NoteBookViewSpec
-                                        #name: 'noteBook'
-                                        #layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -30 1.0)
-                                        #enableChannel: #enableChannel
-                                        #tabable: true
-                                        #model: #tabModel
-                                        #menu: #tabList
-                                        #canvas: #noteBookView
-                                    )
-                                     #(#HorizontalPanelViewSpec
-                                        #name: 'horizontalPanelView1'
-                                        #layout: #(#LayoutFrame -163 1 -1 0 -35 1.0 31 0)
-                                        #component: 
-                                         #(#SpecCollection
-                                            #collection: 
-                                             #(
-                                               #(#ArrowButtonSpec
-                                                  #name: 'MoveLeftButton'
-                                                  #activeHelpKey: #changePositionLeft
-                                                  #tabable: true
-                                                  #model: #moveSelectionLeft
-                                                  #enableChannel: #canMoveOrAlignSelection
-                                                  #isTriggerOnDown: true
-                                                  #direction: #left
-                                                  #extent: #(#Point 32 32)
-                                              )
-                                               #(#ArrowButtonSpec
-                                                  #name: 'MoveRightButton'
-                                                  #activeHelpKey: #changePositionRight
-                                                  #model: #moveSelectionRight
-                                                  #enableChannel: #canMoveOrAlignSelection
-                                                  #isTriggerOnDown: true
-                                                  #direction: #right
-                                                  #extent: #(#Point 32 32)
-                                              )
-                                               #(#ArrowButtonSpec
-                                                  #name: 'MoveDownButton'
-                                                  #activeHelpKey: #changePositionDown
-                                                  #model: #moveSelectionDown
-                                                  #enableChannel: #canMoveOrAlignSelection
-                                                  #isTriggerOnDown: true
-                                                  #direction: #down
-                                                  #extent: #(#Point 32 32)
-                                              )
-                                               #(#ArrowButtonSpec
-                                                  #name: 'MoveUpButton'
-                                                  #activeHelpKey: #changePositionUp
-                                                  #model: #moveSelectionUp
-                                                  #enableChannel: #canMoveOrAlignSelection
-                                                  #isTriggerOnDown: true
-                                                  #direction: #up
-                                                  #extent: #(#Point 32 32)
-                                              )
-                                            )
-                                        )
-                                        #horizontalLayout: #fit
-                                        #verticalLayout: #fit
-                                        #horizontalSpace: 0
-                                        #verticalSpace: 0
-                                    )
-                                     #(#ActionButtonSpec
-                                        #name: 'openWidgetDocumentationButton'
-                                        #layout: #(#LayoutFrame -32 1 -1 0 0 1 31 0)
-                                        #activeHelpKey: #editOpenSpecDocumentation
-                                        #hasCharacterOrientedLabel: false
-                                        #label: 'helpIcon'
-                                        #model: #doOpenWidgetDocumentation
-                                    )
-                                     #(#ActionButtonSpec
-                                        #name: 'cancelButton'
-                                        #layout: #(#LayoutFrame 2 0 -26 1 -1 0.5 -2 1)
-                                        #activeHelpKey: #commitCancel
-                                        #label: 'Cancel'
-                                        #tabable: true
-                                        #model: #cancel
-                                        #enableChannel: #modifiedChannel
-                                    )
-                                     #(#ActionButtonSpec
-                                        #name: 'acceptButton'
-                                        #layout: #(#LayoutFrame 1 0.5 -26 1 -2 1 -2 1)
-                                        #activeHelpKey: #commitOK
-                                        #label: 'OK'
-                                        #tabable: true
-                                        #model: #accept
-                                        #enableChannel: #modifiedChannel
-                                    )
-                                  )
+                   #(#SpecCollection
+                      #collection: #(
+                       #(#MenuPanelSpec
+                          #name: 'menuToolbar2View'
+                          #layout: #(#LayoutFrame -1 0.0 -2 0 -1 1.0 30 0)
+                          #enableChannel: #canMoveOrAlignSelection
+                          #tabable: true
+                          #menu: #menuToolbar2
+                        )
+                       #(#NoteBookViewSpec
+                          #name: 'noteBook'
+                          #layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -30 1.0)
+                          #enableChannel: #enableChannel
+                          #tabable: true
+                          #model: #tabModel
+                          #menu: #tabList
+                          #canvas: #noteBookView
+                        )
+                       #(#HorizontalPanelViewSpec
+                          #name: 'horizontalPanelView1'
+                          #layout: #(#LayoutFrame -163 1 -1 0 -35 1.0 28 0)
+                          #horizontalLayout: #fit
+                          #verticalLayout: #fit
+                          #horizontalSpace: 0
+                          #verticalSpace: 0
+                          #component: 
+                         #(#SpecCollection
+                            #collection: #(
+                             #(#ArrowButtonSpec
+                                #name: 'MoveLeftButton'
+                                #activeHelpKey: #changePositionLeft
+                                #tabable: true
+                                #model: #moveSelectionLeft
+                                #enableChannel: #canMoveOrAlignSelection
+                                #isTriggerOnDown: true
+                                #actionValue: ''
+                                #direction: #left
+                                #useDefaultExtent: true
                               )
-                              #borderWidth: 1
+                             #(#ArrowButtonSpec
+                                #name: 'MoveRightButton'
+                                #activeHelpKey: #changePositionRight
+                                #model: #moveSelectionRight
+                                #enableChannel: #canMoveOrAlignSelection
+                                #isTriggerOnDown: true
+                                #actionValue: ''
+                                #direction: #right
+                                #useDefaultExtent: true
+                              )
+                             #(#ArrowButtonSpec
+                                #name: 'MoveDownButton'
+                                #activeHelpKey: #changePositionDown
+                                #model: #moveSelectionDown
+                                #enableChannel: #canMoveOrAlignSelection
+                                #isTriggerOnDown: true
+                                #actionValue: ''
+                                #direction: #down
+                                #useDefaultExtent: true
+                              )
+                             #(#ArrowButtonSpec
+                                #name: 'MoveUpButton'
+                                #activeHelpKey: #changePositionUp
+                                #model: #moveSelectionUp
+                                #enableChannel: #canMoveOrAlignSelection
+                                #isTriggerOnDown: true
+                                #actionValue: ''
+                                #direction: #up
+                                #useDefaultExtent: true
+                              )
+                             )
+                           
                           )
                         )
+                       #(#ActionButtonSpec
+                          #label: 'helpIcon'
+                          #name: 'openWidgetDocumentationButton'
+                          #layout: #(#LayoutFrame -32 1 -1 0 0 1 31 0)
+                          #activeHelpKey: #editOpenSpecDocumentation
+                          #hasCharacterOrientedLabel: false
+                          #model: #doOpenWidgetDocumentation
+                        )
+                       #(#ActionButtonSpec
+                          #label: 'Cancel'
+                          #name: 'cancelButton'
+                          #layout: #(#LayoutFrame 2 0 -26 1 -1 0.5 -2 1)
+                          #activeHelpKey: #commitCancel
+                          #tabable: true
+                          #model: #cancel
+                          #enableChannel: #modifiedChannel
+                        )
+                       #(#ActionButtonSpec
+                          #label: 'OK'
+                          #name: 'acceptButton'
+                          #layout: #(#LayoutFrame 1 0.5 -26 1 -2 1 -2 1)
+                          #activeHelpKey: #commitOK
+                          #tabable: true
+                          #model: #accept
+                          #enableChannel: #modifiedChannel
+                        )
+                       )
+                     
                     )
-                    #level: 1
-                    #handles: #(#Any 0.318868 1.0)
-                )
-                 #(#UISubSpecification
-                    #name: 'infoBarSubSpec'
-                    #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
-                    #majorKey: #ToolApplicationModel
-                    #minorKey: #windowSpecForInfoBar
-                )
+                  )
+                 )
+               
               )
-          )
+            )
+           #(#UISubSpecification
+              #name: 'infoBarSubSpec'
+              #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
+              #majorKey: #ToolApplicationModel
+              #minorKey: #windowSpecForInfoBar
+            )
+           )
+         
+        )
       )
-
-    "Modified: / 5.9.1998 / 17:42:12 / cg"
 ! !
 
 !UIPainter class methodsFor:'menu specs'!