Tools__NewSystemBrowser.st
branchjv
changeset 19623 40222cca2b32
parent 19610 f7ae06774755
child 19627 5885d1a69511
--- a/Tools__NewSystemBrowser.st	Mon Nov 15 20:19:27 2021 +0000
+++ b/Tools__NewSystemBrowser.st	Mon Nov 15 20:25:35 2021 +0000
@@ -29023,6 +29023,12 @@
     ] ifFalse:[
         rule := ruleSetOrNil.
     ].
+
+    LastLintRulesHolder isNil ifTrue:[
+        LastLintRulesHolder := ValueHolder new.
+    ].
+    LastLintRulesHolder value:rule.
+
     rule isEmptyInTree ifTrue:[
         (self inlineMessageApp)
             reset;
@@ -29033,11 +29039,6 @@
             show.
         ^ self.
     ].
-    
-    LastLintRulesHolder isNil ifTrue:[
-        LastLintRulesHolder := ValueHolder new.
-    ].
-    LastLintRulesHolder value:rule.
 
     (environmentUsed := rbEnvironment) isClassEnvironment ifFalse:[
         "/ change the environment to a class-environment?