--- a/Tools__CheckinInfoDialog.st	Sun Oct 09 22:55:02 2016 +0100
+++ b/Tools__CheckinInfoDialog.st	Tue Oct 18 22:55:22 2016 +0100
@@ -319,7 +319,7 @@
              translateLabel: true
              model: checkinReasonHolder
              isTriggerOnDown: true
-             select: 'reasonBugfix'
+             select: reasonBugfix
            )
           (RadioButtonSpec
              label: 'Feature / Enhancement'
@@ -408,6 +408,7 @@
                    translateLabel: true
                    model: doCancel
                    extent: (Point 282 22)
+                   usePreferredHeight: true
                  )
                 (ActionButtonSpec
                    label: 'OK'
@@ -415,6 +416,7 @@
                    translateLabel: true
                    model: doAccept
                    extent: (Point 282 22)
+                   usePreferredHeight: true
                  )
                 )