--- a/Tools__LintRuleList.st	Wed Dec 03 15:41:14 2014 +0100
+++ b/Tools__LintRuleList.st	Wed Dec 03 19:04:31 2014 +0100
@@ -30,7 +30,7 @@
 BrowserList subclass:#LintRuleList
 	instanceVariableNames:'listHolder filterHolder modeHolder listSelection listView
 		initialSelectionHolder'
-	classVariableNames:''
+	classVariableNames:'LastNameFilter'
 	poolDictionaries:''
 	category:'Interface-Lint'
 !
@@ -270,7 +270,7 @@
     "return/create the 'filterHolder' value holder (automatically generated)"
 
     filterHolder isNil ifTrue:[
-        filterHolder := ValueHolder new.
+        filterHolder := LastNameFilter asValue.
         filterHolder addDependent:self.
     ].
     ^ filterHolder
@@ -364,6 +364,7 @@
     "Invoked when an object that I depend upon sends a change notification."
 
     changedObject == filterHolder ifTrue:[
+       LastNameFilter := filterHolder value.
         self updateList.
         ^ self.
     ].
@@ -830,14 +831,14 @@
 !LintRuleList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleList.st,v 1.26 2014-11-28 15:17:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleList.st,v 1.27 2014-12-03 18:04:31 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleList.st,v 1.26 2014-11-28 15:17:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintRuleList.st,v 1.27 2014-12-03 18:04:31 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__LintRuleList.st,v 1.26 2014-11-28 15:17:40 cg Exp $'
+    ^ '$Id: Tools__LintRuleList.st,v 1.27 2014-12-03 18:04:31 cg Exp $'
 ! !