--- a/MethodFinderWindow.st	Sat Apr 28 21:19:51 2012 +0200
+++ b/MethodFinderWindow.st	Thu May 03 08:02:26 2012 +0200
@@ -707,6 +707,9 @@
     self codeHolder value: nil.                  "reset the source"
 
     self withCursor:Cursor execute do:[
+        pattern includesMatchCharacters ifFalse:[   
+            pattern := '*',pattern,'*'
+        ].
         list := SystemBrowser findImplementorsMatching:pattern in:Smalltalk allClasses ignoreCase:true.
     ].