--- a/Tools__LintRuleSettingsApplication.st	Wed Feb 26 12:32:08 2014 +0100
+++ b/Tools__LintRuleSettingsApplication.st	Wed Feb 26 13:57:03 2014 +0100
@@ -256,10 +256,13 @@
 
     | rule |    
     rule := self rulesetSelectionHolder value.
+
     LintRuleEditDialog new
-        rule: rule;
+        rule: rule deepCopy;
         open.
-    self updateModifiedChannel
+    "/ does not work (are we editing the original, so that the compare does never work?)
+    self modifiedChannel value:true.
+    "/ self updateModifiedChannel
 
     "Modified: / 27-02-2013 / 11:57:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -420,11 +423,11 @@
 !LintRuleSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.3 2014-02-26 10:36:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.4 2014-02-26 12:57:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.3 2014-02-26 10:36:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleSettingsApplication.st,v 1.4 2014-02-26 12:57:03 cg Exp $'
 ! !