--- a/Tools__NewSystemBrowser.st	Tue Jun 20 12:21:26 2017 +0200
+++ b/Tools__NewSystemBrowser.st	Thu Jun 22 06:58:56 2017 +0200
@@ -54785,7 +54785,7 @@
 "/        impl notEmptyOrNil ifTrue:[
 "/        ].
         (aMatchString first isLetter not
-         or:[ aMatchString first isLowercase]) ifTrue:[
+         or:[ aMatchString isLowercaseFirst]) ifTrue:[
             implementors := SystemBrowser findImplementorsMatching:aMatchString in:(environment allClasses) ignoreCase:true.
             implementors size > 0 ifTrue:[
                 |searchClassToken browseAllImplementorsToken|
@@ -54892,8 +54892,8 @@
     ]
 
     "Modified: / 04-07-2006 / 18:48:25 / fm"
-    "Modified (comment): / 07-03-2012 / 12:05:07 / cg"
     "Modified: / 14-10-2013 / 10:36:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 22-06-2017 / 06:57:40 / cg"
 !
 
 switchToClassNamed:aString