Tools__CheckinInfoDialog.st
changeset 9161 e4761f8c188d
parent 8766 f9af1c29b401
child 9508 6ecac35f25b6
--- a/Tools__CheckinInfoDialog.st	Mon Nov 02 14:28:51 2009 +0100
+++ b/Tools__CheckinInfoDialog.st	Mon Nov 02 15:53:23 2009 +0100
@@ -116,6 +116,7 @@
               model: logMessageHolder
               hasHorizontalScrollBar: true
               hasVerticalScrollBar: true
+              hasKeyboardFocusInitially: false
             )
            (CheckBoxSpec
               label: 'Quick Checkin (Only Classes in ChangeSet)'
@@ -143,29 +144,30 @@
               acceptOnPointerLeave: false
             )
            (HorizontalPanelViewSpec
-              name: 'HorizontalPanel1'
+              name: 'ButtonPanel1'
               layout: (LayoutFrame 0 0.0 -40 1 0 1.0 0 1.0)
               horizontalLayout: fitSpace
               verticalLayout: center
               horizontalSpace: 3
               verticalSpace: 2
+              reverseOrderIfOKAtLeft: true
               component: 
              (SpecCollection
                 collection: (
                  (ActionButtonSpec
+                    label: 'Cancel'
+                    name: 'Button2'
+                    translateLabel: true
+                    model: doCancel
+                    extent: (Point 277 22)
+                  )
+                 (ActionButtonSpec
                     label: 'OK'
                     name: 'Button1'
                     translateLabel: true
                     model: doAccept
                     extent: (Point 277 22)
                   )
-                 (ActionButtonSpec
-                    label: 'Cancel'
-                    name: 'Button2'
-                    translateLabel: true
-                    model: doCancel
-                    extent: (Point 277 22)
-                  )
                  )
                
               )
@@ -320,5 +322,9 @@
 !CheckinInfoDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CheckinInfoDialog.st,v 1.9 2009-09-22 17:17:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CheckinInfoDialog.st,v 1.10 2009-11-02 14:53:23 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CheckinInfoDialog.st,v 1.10 2009-11-02 14:53:23 cg Exp $'
 ! !