--- a/Tools_BrowserList.st Thu Oct 25 14:15:21 2012 +0200
+++ b/Tools_BrowserList.st Thu Oct 25 14:16:05 2012 +0200
@@ -1281,6 +1281,7 @@
packageFilter isNil ifTrue:[^ true].
classPackage := aClass package.
(packageFilter includes:classPackage) ifTrue:[^ true].
+ (packageFilter includes:self class nameListEntryForChanged) ifTrue:[^ true].
aClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
|mthdPackage|
@@ -1812,5 +1813,5 @@
!BrowserList class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.45 2012-10-24 17:12:44 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.46 2012-10-25 12:16:05 cg Exp $'
! !