--- a/Tools__NewSystemBrowser.st	Fri May 17 17:13:19 2019 +0200
+++ b/Tools__NewSystemBrowser.st	Fri May 17 17:39:38 2019 +0200
@@ -60531,19 +60531,18 @@
 !
 
 theSingleSelectedLintRuleHolder
-
-    ^BlockValue
-        with:[:generator|
-            | rule size |
-
-            rule := nil.
-            size := 0.
-            (generator value ? #()) do:[:each|rule := each.size := size + 1].
-            size == 1 ifTrue:[rule] ifFalse:[nil]]
+    ^ BlockValue
+        with:[:selectedLintRulesValue|
+                | rule size |
+                size := 0.
+                (selectedLintRulesValue ? #()) do:[:each| rule := each. size := size + 1].
+                size == 1 ifTrue:[rule] ifFalse:[nil]
+            ]
         argument: self selectedLintRules
 
     "Created: / 05-02-2010 / 12:56:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 01-03-2012 / 15:31:23 / cg"
+    "Modified: / 17-05-2019 / 17:17:42 / Stefan Vogel"
 !
 
 theSingleSelectedLoadedNonMetaclassOrNil