--- a/Tools__LintRuleSettingsApplication.st	Fri Jan 23 01:28:30 2015 +0100
+++ b/Tools__LintRuleSettingsApplication.st	Fri Jan 23 12:43:43 2015 +0100
@@ -151,20 +151,6 @@
              component: 
             (SpecCollection
                collection: (
-                (CheckBoxSpec
-                   label: 'Enable code checking as you type'
-                   name: 'EnableSmallSenseBackgroundLint'
-                   enableChannel: smallSenseEnabled
-                   model: smallSenseBackgroundLintEnabled
-                   translateLabel: true
-                   extent: (Point 587 22)
-                   useDynamicPreferredHeight: true
-                   usePreferredHeight: true
-                 )
-                (DividerSpec
-                   name: 'Separator1'
-                   extent: (Point 587 5)
-                 )
                 (ViewSpec
                    name: 'Box2'
                    component: 
@@ -284,7 +270,7 @@
                       )
                     
                    )
-                   extent: (Point 587 440)
+                   extent: (Point 587 473)
                  )
                 )
               
@@ -573,14 +559,19 @@
 hasUnsavedChanges
     "superclass AbstractSettingsApplication says that I am responsible to implement this method"
 
-    |defaultRules currentRules|
+    |defaultRules currentRules firstTry|
 
     RBCompositeLintRule isNil ifTrue:[^ false].
+
+    firstTry := true.
     SequenceableCollection missingClassInLiteralArrayErrorSignal handle:[:ex |
         "/ maybe we have to load additional packages...
-        (Smalltalk isPackageLoaded:'stx:goodies/refactoryBrowser/lint/spelling') ifFalse:[
-            Smalltalk loadPackage:'stx:goodies/refactoryBrowser/lint/spelling'.
-            ex restart.
+        firstTry ifTrue:[
+            (Smalltalk isPackageLoaded:'stx:goodies/refactoryBrowser/lint/spelling') ifFalse:[
+                firstTry := false.
+                Smalltalk loadPackage:'stx:goodies/refactoryBrowser/lint/spelling'.
+                ex restart.
+            ].
         ].
         ex reject.
     ] do:[
@@ -598,11 +589,11 @@
 !LintRuleSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.17 2014-12-15 20:27:18 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.18 2015-01-23 11:43:43 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.17 2014-12-15 20:27:18 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.18 2015-01-23 11:43:43 cg Exp $'
 ! !