SystemBrowser.st
changeset 7847 bc2f06886dd6
parent 7827 36dc2d8ec6b6
child 7914 d8fa35236729
--- a/SystemBrowser.st	Thu Sep 20 16:07:49 2007 +0200
+++ b/SystemBrowser.st	Thu Sep 20 16:10:09 2007 +0200
@@ -3769,7 +3769,7 @@
     ignoreCase == true ifTrue:[
         lcSelector := aSelectorMatchString asLowercase.
 
-        testST := [:aSelector :aMethod | (compare value:lcSelector value:aMethod name asLowercase) ].
+        testST := [:aSelector :aMethod | (compare value:lcSelector value:(aMethod name ? '') asLowercase) ].
         testJava := [:aSelector :aMethod | (compare value:aSelector value:aMethod name asLowercase) ].
     ] ifFalse:[
         testST := [:aSelector :aMethod | (compare value:aSelectorMatchString value:aSelector) ].
@@ -3801,6 +3801,8 @@
                                                with:Float
                                                with:SmallInteger)
     "
+
+    "Modified: / 20-09-2007 / 16:02:10 / cg"
 !
 
 findImplementors:aSelectorMatchString inMethods:aCollectionOfMethods ignoreCase:ignoreCase match:doMatch
@@ -5425,7 +5427,7 @@
 !SystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.245 2007-07-20 11:22:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.246 2007-09-20 14:10:09 cg Exp $'
 ! !
 
 SystemBrowser initialize!