--- a/Tools__TagList.st	Sun Jun 01 12:16:44 2014 +0200
+++ b/Tools__TagList.st	Sun Jun 01 12:17:03 2014 +0200
@@ -2076,7 +2076,7 @@
             filteredList := filteredList reject:[:tag | tag isFunctionTag].
         ] ifFalse:[
             showOnly == #functions ifTrue:[
-                filteredList := filteredList select:[:tag | tag isFunctionTag].
+                filteredList := filteredList select:[:tag | tag isFunctionOrMethodTag].
             ].
         ].
     ].
@@ -3902,14 +3902,14 @@
 !TagList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.50 2014-05-22 22:16:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.51 2014-06-01 10:17:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.50 2014-05-22 22:16:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagList.st,v 1.51 2014-06-01 10:17:03 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__TagList.st,v 1.50 2014-05-22 22:16:24 cg Exp $'
+    ^ '$Id: Tools__TagList.st,v 1.51 2014-06-01 10:17:03 cg Exp $'
 ! !