author | Claus Gittinger <cg@exept.de> |
Thu, 03 May 2012 08:02:26 +0200 | |
changeset 2889 | e17b2eacfe84 |
parent 2888 | 9adfb8a84696 |
child 2890 | 3d8556368fe9 |
--- 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. ].