diff -r aaedb08ddef2 -r 45119443a715 Tools__CheckinInfoDialog.st
--- a/Tools__CheckinInfoDialog.st	Wed Sep 30 04:03:35 2015 +0000
+++ b/Tools__CheckinInfoDialog.st	Wed Sep 30 17:24:11 2015 +0200
@@ -79,6 +79,10 @@
 
 reasonRefactoring
     ^ #reasonRefactoring
+!
+
+reasonUIEnhancement
+    ^ #reasonUIEnhancement
 ! !
 
 !CheckinInfoDialog class methodsFor:'help specs'!
@@ -130,6 +134,9 @@
 #checkinReasonRefactoring
 'The code was refactored/improved for better structure or maintainability'
 
+#checkinReasonUIEnhancement
+'Some enhancement in a UI which makes it look better or easier to use\(but does not add new functionality).\Please describe in detail what you did in the checkin info'
+
 #checkinReasonOther
 'Some other change, which does not fit into one of the above.\Please describe in detail what you did in the checkin info'
 
@@ -161,7 +168,7 @@
          label: 'Enter Log Message'
          name: 'Enter Log Message'
          min: (Point 538 387)
-         bounds: (Rectangle 0 0 579 506)
+         bounds: (Rectangle 0 0 592 558)
        )
        component: 
       (SpecCollection
@@ -209,7 +216,7 @@
            )
           (TextEditorSpec
              name: 'TextEditor1'
-             layout: (LayoutFrame 2 0.0 68 0 -2 1 -275 1)
+             layout: (LayoutFrame 2 0.0 68 0 -2 1 -300 1)
              activeHelpKey: logMessage
              model: logMessageHolder
              hasHorizontalScrollBar: true
@@ -218,14 +225,14 @@
            )
           (LabelSpec
              name: 'Label4'
-             layout: (LayoutFrame 0 0.0 -269 1 0 1.0 -247 1)
+             layout: (LayoutFrame 0 0.0 -293 1 0 1.0 -271 1)
              translateLabel: true
              labelChannel: warningMessageHolder
            )
           (CheckBoxSpec
              label: 'Quick Checkin (Only Classes in ChangeSet)'
              name: 'CheckInChangedOnlyCheckbox'
-             layout: (LayoutFrame 3 0 -244 1 -3 1 -222 1)
+             layout: (LayoutFrame 3 0 -268 1 -3 1 -246 1)
              activeHelpKey: quickCheckin
              visibilityChannel: quickCheckInVisibleHolder
              enableChannel: quickCheckInEnabledHolder
@@ -235,7 +242,7 @@
           (CheckBoxSpec
              label: 'Validate Package Consistency'
              name: 'CheckBox1'
-             layout: (LayoutFrame 3 0 -217 1 -3 1 -195 1)
+             layout: (LayoutFrame 3 0 -241 1 -3 1 -219 1)
              activeHelpKey: validateConsistency
              visibilityChannel: validateConsistencyVisibleHolder
              enableChannel: validateConsistencyEnabledHolder
@@ -245,7 +252,7 @@
           (CheckBoxSpec
              label: 'Mark as Stable'
              name: 'MarkStableCheckBox'
-             layout: (LayoutFrame 3 0 -190 1 -3 1 -168 1)
+             layout: (LayoutFrame 3 0 -214 1 -3 1 -192 1)
              activeHelpKey: markAsStable
              model: isStableHolder
              translateLabel: true
@@ -253,14 +260,14 @@
           (LabelSpec
              label: 'Tag:'
              name: 'Label3'
-             layout: (LayoutFrame -40 0.5 -189 1 0 0.5 -167 1)
+             layout: (LayoutFrame -40 0.5 -213 1 0 0.5 -191 1)
              activeHelpKey: tag
              translateLabel: true
              adjust: right
            )
           (ComboBoxSpec
              name: 'ComboBox1'
-             layout: (LayoutFrame 0 0.5 -190 1 -3 1 -168 1)
+             layout: (LayoutFrame 0 0.5 -214 1 -3 1 -192 1)
              activeHelpKey: tag
              enableChannel: notMarkAsStableHolder
              model: tagHolder
@@ -273,7 +280,7 @@
           (LabelSpec
              label: 'Reason for Checkin:'
              name: 'Label6'
-             layout: (AlignmentOrigin -126 0.5 -146 1 1 0.5)
+             layout: (AlignmentOrigin -126 0.5 -170 1 1 0.5)
              activeHelpKey: checkinReason
              translateLabel: true
              resizeForLabel: true
@@ -282,7 +289,7 @@
           (RadioButtonSpec
              label: 'Bugfix'
              name: 'RadioButton1'
-             layout: (LayoutFrame -123 0.5 -157 1 -126 1 -135 1)
+             layout: (LayoutFrame -123 0.5 -181 1 -126 1 -159 1)
              activeHelpKey: checkinReasonBugfix
              translateLabel: true
              model: checkinReasonHolder
@@ -292,7 +299,7 @@
           (RadioButtonSpec
              label: 'Feature / Enhancement'
              name: 'RadioButton2'
-             layout: (LayoutFrame -123 0.5 -133 1 -126 1 -111 1)
+             layout: (LayoutFrame -123 0.5 -157 1 -126 1 -135 1)
              activeHelpKey: checkinReasonFeature
              translateLabel: true
              model: checkinReasonHolder
@@ -302,7 +309,7 @@
           (RadioButtonSpec
              label: 'Refactoring / Code Cleanup'
              name: 'RadioButton3'
-             layout: (LayoutFrame -123 0.5 -109 1 -126 1 -87 1)
+             layout: (LayoutFrame -123 0.5 -133 1 -126 1 -111 1)
              activeHelpKey: checkinReasonRefactoring
              translateLabel: true
              model: checkinReasonHolder
@@ -310,6 +317,16 @@
              select: reasonRefactoring
            )
           (RadioButtonSpec
+             label: 'UI Enhancement / Beautification'
+             name: 'RadioButton6'
+             layout: (LayoutFrame -123 0.5 -109 1 -126 1 -87 1)
+             activeHelpKey: checkinReasonUIEnhancement
+             translateLabel: true
+             model: checkinReasonHolder
+             isTriggerOnDown: true
+             select: reasonUIEnhancement
+           )
+          (RadioButtonSpec
              label: 'Documentation / Comment Only'
              name: 'RadioButton5'
              layout: (LayoutFrame -123 0.5 -85 1 -126 1 -63 1)
@@ -345,14 +362,14 @@
                    name: 'Button2'
                    translateLabel: true
                    model: doCancel
-                   extent: (Point 277 22)
+                   extent: (Point 282 22)
                  )
                 (ActionButtonSpec
                    label: 'OK'
                    name: 'Button1'
                    translateLabel: true
                    model: doAccept
-                   extent: (Point 277 22)
+                   extent: (Point 282 22)
                  )
                 )