changed: #isClass:shownWithPackageFilter:
authorClaus Gittinger <cg@exept.de>
Thu, 25 Oct 2012 14:16:05 +0200
changeset 11939 b5bec33f8092
parent 11938 2520fe691d4d
child 11940 b1ff0ac2b9fa
changed: #isClass:shownWithPackageFilter:
Tools_BrowserList.st
--- 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 $'
 ! !