# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1461503492 -7200
# Node ID 3db3e2fa66b5ea07978d8401f046d9b369d92909
# Parent  f99d1d3a21f9b89c621a54cd9abaeb24a9726fc1
#UI_ENHANCEMENT by cg
class: SmallSense::SettingsAppl
changed: #windowSpec
geometry

diff -r f99d1d3a21f9 -r 3db3e2fa66b5 SmallSense__SettingsAppl.st
--- a/SmallSense__SettingsAppl.st	Sun Mar 27 13:43:12 2016 +0200
+++ b/SmallSense__SettingsAppl.st	Sun Apr 24 15:11:32 2016 +0200
@@ -104,7 +104,8 @@
 !SettingsAppl class methodsFor:'interface specs'!
 
 windowSpec
-    "This resource specification was automatically generated by the UIPainter of ST/X."
+    "This resource specification was automatically generated
+     by the UIPainter of ST/X."
 
     "Do not manually edit this!! If it is corrupted,
      the UIPainter may not be able to read the specification."
@@ -115,19 +116,19 @@
      SmallSense::SettingsAppl open
     "
 
-
+    <resource: #canvas>
 
-    ^
+    ^ 
     #(FullSpec
        name: windowSpec
-       window:
+       window: 
       (WindowSpec
          label: 'SmallSense Settings'
          name: 'SmallSense Settings'
          min: (Point 10 10)
          bounds: (Rectangle 0 0 536 651)
        )
-       component:
+       component: 
       (SpecCollection
          collection: (
           (CheckBoxSpec
@@ -149,7 +150,7 @@
              verticalLayout: top
              horizontalSpace: 3
              verticalSpace: 3
-             component:
+             component: 
             (SpecCollection
                collection: (
                 (CheckBoxSpec
@@ -159,7 +160,7 @@
                    enableChannel: smallSenseEnabled
                    model: smallSenseBackgroundLintEnabled
                    translateLabel: true
-                   extent: (Point 536 22)
+                   extent: (Point 536 30)
                  )
                 (CheckBoxSpec
                    label: 'Enable Background Type Inferencer'
@@ -168,7 +169,7 @@
                    enableChannel: smallSenseEnabled
                    model: smallSenseBackgroundTypingEnabled
                    translateLabel: true
-                   extent: (Point 536 22)
+                   extent: (Point 536 30)
                  )
                 (CheckBoxSpec
                    label: 'Enable "Electric Edit" Support'
@@ -177,32 +178,32 @@
                    enableChannel: smallSenseEnabled
                    model: smallSenseElectricEditSupportEnabled
                    translateLabel: true
-                   extent: (Point 536 22)
+                   extent: (Point 536 30)
                  )
                 (CheckBoxSpec
                    label: 'Code Completion using SmallSense Completion Engine'
                    name: 'CheckBox4'
+                   activeHelpKey: smallSenseCompletionEnabled
                    enableChannel: smallSenseEnabled
                    model: smallSenseCompletionEnabled
-                   extent: (Point 536 22)
-                   activeHelpKey: smallSenseCompletionEnabled
                    translateLabel: true
+                   extent: (Point 536 30)
                  )
                 (CheckBoxSpec
                    label: 'Auto-Complete when Unambiguous'
                    name: 'CheckBox5'
+                   activeHelpKey: smallSenseCompleteIfUnambiguous
                    enableChannel: smallSenseEnabledAndCompletionEnabled
                    model: smallSenseCompleteIfUnambiguous
-                   extent: (Point 536 22)
-                   activeHelpKey: smallSenseCompleteIfUnambiguous
                    translateLabel: true
+                   extent: (Point 536 30)
                  )
                 )
-
+              
              )
            )
           )
-
+        
        )
      )
 ! !