--- a/Tools__TagsBrowser.st	Thu Dec 13 14:31:51 2012 +0000
+++ b/Tools__TagsBrowser.st	Mon Jan 14 11:48:37 2013 +0000
@@ -2372,6 +2372,10 @@
     application := theTagsBrowser.
 !
 
+clearList
+    self list:nil
+!
+
 filter:aString
     filter := aString.
     list filter:aString.
@@ -2596,13 +2600,13 @@
 !TagsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.30 2012/09/08 17:54:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.31 2012/11/26 21:47:52 cg Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.30 2012/09/08 17:54:31 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.31 2012/11/26 21:47:52 cg Exp §'
 !
 
 version_SVN
-    ^ '$Id: Tools__TagsBrowser.st 8054 2012-09-13 09:15:20Z vranyj1 $'
+    ^ '$Id: Tools__TagsBrowser.st 8083 2013-01-14 11:48:37Z vranyj1 $'
 ! !