--- a/Tools__LintRuleSettingsApplication.st	Wed Nov 19 21:44:05 2014 +0100
+++ b/Tools__LintRuleSettingsApplication.st	Wed Nov 19 21:57:25 2014 +0100
@@ -465,6 +465,8 @@
 hasUnsavedChanges
     "superclass AbstractSettingsApplication says that I am responsible to implement this method"
 
+    |defaultRules currentRules|
+
     RBCompositeLintRule isNil ifTrue:[^ false].
     SequenceableCollection missingClassInLiteralArrayErrorSignal handle:[:ex |
         "/ maybe we have to load additional packages...
@@ -474,7 +476,12 @@
         ].
         ex reject.
     ] do:[
-        ^ RBCompositeLintRule rulesetsUserDefined asArray ~= self rulesetList asArray
+        defaultRules := RBCompositeLintRule rulesetsUserDefined copyAsOrderedCollection.
+        currentRules := self rulesetList copyAsOrderedCollection.
+        "/ I will always add the defaultRule
+        defaultRules removeAllFoundIn:RBCompositeLintRule rulesetsBuiltin.
+        currentRules removeAllFoundIn:RBCompositeLintRule rulesetsBuiltin.
+        ^ defaultRules ~= currentRules
     ].
 
     "Modified: / 28-02-2013 / 10:03:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -483,11 +490,11 @@
 !LintRuleSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.11 2014-11-11 14:17:09 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.12 2014-11-19 20:57:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.11 2014-11-11 14:17:09 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.12 2014-11-19 20:57:25 cg Exp $'
 ! !