--- a/Tools__LintRuleSettingsApplication.st	Sat Feb 28 03:02:31 2015 +0100
+++ b/Tools__LintRuleSettingsApplication.st	Sat Feb 28 03:09:29 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2006 by eXept Software AG
               All Rights Reserved
@@ -544,13 +546,13 @@
     | oldRulesets newRulesets toRemove toAdd |
 
     self smallSenseEnabledHolder value ifTrue:[
-        SmallSense::SmalltalkChecker isNil ifTrue:[
-            Smalltalk loadPackage:'stx:goodies/smallsense'
-        ].
+        UserPreferences current addPreloadedPackage:'stx:goodies/smallsense'
+    ] ifFalse:[
+        UserPreferences current removePreloadedPackage:'stx:goodies/smallsense'
     ].
     SmallSense::SmalltalkChecker notNil ifTrue:[
         UserPreferences current 
-            perform:#smallSenseEnabled: with:self smallSenseEnabledHolder value ifNotUnderstood:[]
+            perform:#smallSenseEnabled: with:(self smallSenseEnabledHolder value) ifNotUnderstood:[]
     ].
 
     oldRulesets := RBCompositeLintRule rulesetsUserDefined.
@@ -621,11 +623,11 @@
 !LintRuleSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.20 2015-02-22 15:28:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.21 2015-02-28 02:09:29 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.20 2015-02-22 15:28:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.21 2015-02-28 02:09:29 cg Exp $'
 ! !