--- a/Tools__TagList.st	Sun Sep 01 09:31:11 2013 +0200
+++ b/Tools__TagList.st	Sun Sep 01 09:37:23 2013 +0200
@@ -3524,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:[
@@ -3672,14 +3673,14 @@
 !TagList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.34 2013-08-31 19:33:25 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.34 2013-08-31 19:33:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.35 2013-09-01 07:37:23 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__TagList.st,v 1.34 2013-08-31 19:33:25 cg Exp $'
+    ^ '$Id: Tools__TagList.st,v 1.35 2013-09-01 07:37:23 cg Exp $'
 ! !