--- a/Tools__TagList.st	Mon Sep 02 13:53:47 2013 +0100
+++ b/Tools__TagList.st	Wed Sep 04 11:33:19 2013 +0100
@@ -1535,15 +1535,9 @@
 
     filter includesMatchCharacters ifTrue:[
         lcFilter := filter asLowercase.
-        ^ aList
-            select:[:tag |
-                lcFilter match:tag label ignoreCase:true 
-            ]
+        ^ aList select:[:tag | lcFilter match:tag label caseSensitive:false]
     ].
-    ^ aList
-        select:[:tag |
-            tag label includesString:filter caseSensitive:false
-        ]
+    ^ aList select:[:tag | tag label includesString:filter caseSensitive:false]
 
     "Modified: / 01-08-2012 / 16:52:02 / cg"
 !
@@ -3530,11 +3524,12 @@
                     ] ifFalse:[
                         aChange isMethodChange ifTrue:[
                             hideMethods == true ifFalse:[
-                                targets add:(Tag::TMethod
+                                targets add:((Tag::TMethod
                                             label:(aChange selector) 
                                             pattern:('/^' , aChange selector)
                                             type:nil
-                                            lineNumber:lNr).
+                                            lineNumber:lNr)
+                                                isMeta:(aChange className endsWith:' class')).
                             ]
                         ] ifFalse:[
                             aChange isPrimitiveChange ifTrue:[
@@ -3678,11 +3673,11 @@
 !TagList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.33 2013-08-22 07:59:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.35 2013-09-01 07:37:23 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.33 2013-08-22 07:59:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.35 2013-09-01 07:37:23 cg Exp $'
 !
 
 version_HG
@@ -3691,6 +3686,6 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__TagList.st,v 1.33 2013-08-22 07:59:49 cg Exp $'
+    ^ '$Id: Tools__TagList.st,v 1.35 2013-09-01 07:37:23 cg Exp $'
 ! !