# HG changeset patch
# User ca
# Date 1196855500 -3600
# Node ID 7f16eb639cc1c0f27a13970bfb58843360a3a5ff
# Parent  1a7921b6c104d78d797f2aa1163435ed43c51215
tabing order

diff -r 1a7921b6c104 -r 7f16eb639cc1 UILayoutTool.st
--- a/UILayoutTool.st	Wed Dec 05 11:54:52 2007 +0100
+++ b/UILayoutTool.st	Wed Dec 05 12:51:40 2007 +0100
@@ -9,10 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
-
-
-
 "{ Package: 'stx:libtool2' }"
 
 ApplicationModel subclass:#UILayoutTool
@@ -202,7 +198,7 @@
           label: 'UILayoutTool'
           name: 'UILayoutTool'
           min: (Point 10 10)
-          bounds: (Rectangle 14 46 359 228)
+          bounds: (Rectangle 0 0 345 107)
         )
         component: 
        (SpecCollection
@@ -212,7 +208,7 @@
               name: 'FramedBox'
               layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 108 0)
               labelPosition: topLeft
-                    translateLabel: true
+              translateLabel: true
               component: 
              (SpecCollection
                 collection: (
@@ -245,7 +241,7 @@
                   )
                  (InputFieldSpec
                     name: 'fieldLeftFraction'
-                    layout: (LayoutFrame 103 0 24 0 153 0 46 0)
+                    layout: (LayoutFrame 102 0 25 0 152 0 47 0)
                     activeHelpKey: leftRelative
                     tabable: true
                     model: leftFraction
@@ -256,6 +252,27 @@
                     acceptOnPointerLeave: false
                   )
                  (ActionButtonSpec
+                    label: 'imageAbsX'
+                    name: 'actionAbsoluteLeft'
+                    layout: (LayoutFrame 178 0 24 0 200 0 46 0)
+                    activeHelpKey: makeLeftAbsolute
+                    hasCharacterOrientedLabel: false
+                    tabable: true
+                    model: absoluteLeft
+                  )
+                 (InputFieldSpec
+                    name: 'fieldLeftOffset'
+                    layout: (LayoutFrame 203 0 24 0 253 0 46 0)
+                    activeHelpKey: leftAbsolute
+                    tabable: true
+                    model: leftOffset
+                    group: inputGroup
+                    type: numberOrNil
+                    acceptChannel: acceptChannel
+                    modifiedChannel: modifiedChannel
+                    acceptOnPointerLeave: false
+                  )
+                 (ActionButtonSpec
                     label: 'imageAbsXFromRight'
                     name: 'actionRightRelativeLeft'
                     layout: (LayoutFrame 257 0 24 0 279 0 46 0)
@@ -264,27 +281,6 @@
                     tabable: true
                     model: rightRelativeLeft
                   )
-                 (InputFieldSpec
-                    name: 'fieldLeftOffset'
-                    layout: (LayoutFrame 203 0 24 0 253 0 46 0)
-                    activeHelpKey: leftAbsolute
-                    tabable: true
-                    model: leftOffset
-                    group: inputGroup
-                    type: numberOrNil
-                    acceptChannel: acceptChannel
-                    modifiedChannel: modifiedChannel
-                    acceptOnPointerLeave: false
-                  )
-                 (ActionButtonSpec
-                    label: 'imageAbsX'
-                    name: 'actionAbsoluteLeft'
-                    layout: (LayoutFrame 178 0 24 0 200 0 46 0)
-                    activeHelpKey: makeLeftAbsolute
-                    hasCharacterOrientedLabel: false
-                    tabable: true
-                    model: absoluteLeft
-                  )
                  (LabelSpec
                     label: 'Top:'
                     name: 'labelTop'
@@ -313,13 +309,13 @@
                     acceptOnPointerLeave: false
                   )
                  (ActionButtonSpec
-                    label: 'imageAbsYFromBottom'
-                    name: 'actionBottomRelativeTop'
-                    layout: (LayoutFrame 257 0 51 0 279 0 73 0)
-                    activeHelpKey: makeTopRelativeFromBottom
+                    label: 'imageAbsY'
+                    name: 'actionAbsoluteTop'
+                    layout: (LayoutFrame 178 0 51 0 200 0 73 0)
+                    activeHelpKey: makeTopAbsolute
                     hasCharacterOrientedLabel: false
                     tabable: true
-                    model: bottomRelativeTop
+                    model: absoluteTop
                   )
                  (InputFieldSpec
                     name: 'fieldTopOffset'
@@ -334,13 +330,13 @@
                     acceptOnPointerLeave: false
                   )
                  (ActionButtonSpec
-                    label: 'imageAbsY'
-                    name: 'actionAbsoluteTop'
-                    layout: (LayoutFrame 178 0 51 0 200 0 73 0)
-                    activeHelpKey: makeTopAbsolute
+                    label: 'imageAbsYFromBottom'
+                    name: 'actionBottomRelativeTop'
+                    layout: (LayoutFrame 257 0 51 0 279 0 73 0)
+                    activeHelpKey: makeTopRelativeFromBottom
                     hasCharacterOrientedLabel: false
                     tabable: true
-                    model: absoluteTop
+                    model: bottomRelativeTop
                   )
                  )
                
@@ -2120,7 +2116,7 @@
           label: 'UILayoutTool-LayoutFrame'
           name: 'UILayoutTool-LayoutFrame'
           min: (Point 10 10)
-          bounds: (Rectangle 14 46 413 349)
+          bounds: (Rectangle 0 0 399 303)
           forceRecursiveBackground: false
         )
         component: 
@@ -2137,7 +2133,7 @@
               name: 'FramedBox'
               layout: (LayoutFrame 1 0.0 113 0 0 1.0 214 0)
               labelPosition: topLeft
-                    translateLabel: true
+              translateLabel: true
               component: 
              (SpecCollection
                 collection: (
@@ -2170,13 +2166,13 @@
                     acceptOnPointerLeave: false
                   )
                  (ActionButtonSpec
-                    label: 'imageAbsXFromRight'
-                    name: 'actionRightRelativeRight'
-                    layout: (LayoutFrame 257 0 14 0 279 0 36 0)
-                    activeHelpKey: makeRightRelativeFromRight
+                    label: 'imageAbsX'
+                    name: 'actionAbsoluteRight'
+                    layout: (LayoutFrame 178 0 14 0 200 0 36 0)
+                    activeHelpKey: makeRightAbsolute
                     hasCharacterOrientedLabel: false
                     tabable: true
-                    model: rightRelativeRight
+                    model: absoluteRight
                   )
                  (InputFieldSpec
                     name: 'fieldRightOffset'
@@ -2192,13 +2188,13 @@
                     acceptOnPointerLeave: false
                   )
                  (ActionButtonSpec
-                    label: 'imageAbsX'
-                    name: 'actionAbsoluteRight'
-                    layout: (LayoutFrame 178 0 14 0 200 0 36 0)
-                    activeHelpKey: makeRightAbsolute
+                    label: 'imageAbsXFromRight'
+                    name: 'actionRightRelativeRight'
+                    layout: (LayoutFrame 257 0 14 0 279 0 36 0)
+                    activeHelpKey: makeRightRelativeFromRight
                     hasCharacterOrientedLabel: false
                     tabable: true
-                    model: absoluteRight
+                    model: rightRelativeRight
                   )
                  (LabelSpec
                     label: 'Bottom:'
@@ -2229,13 +2225,13 @@
                     acceptOnPointerLeave: false
                   )
                  (ActionButtonSpec
-                    label: 'imageAbsYFromBottom'
-                    name: 'actionBottomRelativeBottom'
-                    layout: (LayoutFrame 257 0 42 0 279 0 64 0)
-                    activeHelpKey: makeBottomRelativeFromBottom
+                    label: 'imageAbsY'
+                    name: 'actionAbsoluteBottom'
+                    layout: (LayoutFrame 178 0 42 0 200 0 64 0)
+                    activeHelpKey: makeBottomAbsolute
                     hasCharacterOrientedLabel: false
                     tabable: true
-                    model: bottomRelativeBottom
+                    model: absoluteBottom
                   )
                  (InputFieldSpec
                     name: 'fieldBottomOffset'
@@ -2251,13 +2247,13 @@
                     acceptOnPointerLeave: false
                   )
                  (ActionButtonSpec
-                    label: 'imageAbsY'
-                    name: 'actionAbsoluteBottom'
-                    layout: (LayoutFrame 178 0 42 0 200 0 64 0)
-                    activeHelpKey: makeBottomAbsolute
+                    label: 'imageAbsYFromBottom'
+                    name: 'actionBottomRelativeBottom'
+                    layout: (LayoutFrame 257 0 42 0 279 0 64 0)
+                    activeHelpKey: makeBottomRelativeFromBottom
                     hasCharacterOrientedLabel: false
                     tabable: true
-                    model: absoluteBottom
+                    model: bottomRelativeBottom
                   )
                  )
                
@@ -2279,21 +2275,13 @@
               menu: commonFrameLayoutsMenu2
               textDefault: true
             )
-           #(#MenuPanelSpec
-              #name: 'commonLayoutToolBar3'
-              #layout: #(LayoutFrame 6 0.0 295 0 -4 1.0 327 0)
-              #level: 0
-              #tabable: true
-              #menu: #commonFrameLayoutsMenu3
-              #textDefault: true
-
-
-
-
-
-
-
-
+           (MenuPanelSpec
+              name: 'commonLayoutToolBar3'
+              layout: (LayoutFrame 6 0.0 295 0 -4 1.0 327 0)
+              level: 0
+              tabable: true
+              menu: commonFrameLayoutsMenu3
+              textDefault: true
             )
            )