--- a/Tools__ClassList.st	Mon Mar 27 13:18:34 2017 +0200
+++ b/Tools__ClassList.st	Mon Mar 27 13:27:45 2017 +0200
@@ -1280,7 +1280,7 @@
                             classesAlready add:cls.
                             (nameFilter isNil 
                               or:[ (nameFilterIncludesMatchCharacters not and:[ cls name asLowercase startsWith:lcNameFilter])
-                              or:[ (nameFilterIncludesMatchCharacters and:[nameFilter match:cls name ignoreCase:true]) ]]) ifTrue:[
+                              or:[ (nameFilterIncludesMatchCharacters and:[nameFilter match:cls name caseSensitive:false]) ]]) ifTrue:[
                                 isAnonymousJavaClass := cls isJavaClass and:[cls isAnonymous].
 
                                 "Do not show Java anonymous classes"
@@ -1355,6 +1355,7 @@
 
     "Modified: / 04-07-2011 / 18:33:56 / cg"
     "Modified: / 06-08-2014 / 14:14:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 27-03-2017 / 12:55:34 / stefan"
 !
 
 listOfClassesByInheritance