--- 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 $'
! !