Tools__NewSystemBrowser.st
changeset 17948 870ec230fdc9
parent 17935 23bbb49d2d3c
child 17963 e2802f2e5772
--- a/Tools__NewSystemBrowser.st	Fri Jan 19 11:03:15 2018 +0100
+++ b/Tools__NewSystemBrowser.st	Fri Jan 19 11:57:52 2018 +0100
@@ -57689,7 +57689,7 @@
                     ((selector == #findImplementors:in:ignoreCase:match:)
                     and:[ (arguments first numArgs == 0)
                     and:[
-                            string := (arguments at:1) asMutator.
+                            string := arguments first asMutator.
                             altArguments := arguments copy.
                             altArguments at:1 put:string.
                             initialList := self class perform:selector withArguments:altArguments.
@@ -57715,7 +57715,7 @@
                         "/     confirm:question
                         "/     yesLabel:(resources string:'Search Again')
                         "/     noLabel:(resources string:'Cancel').
-                        (match not and:[string includesMatchCharacters]) ifTrue:[
+                        (match not and:[string notNil and:[string includesMatchCharacters]]) ifTrue:[
                             answer := Dialog
                                         choose:question
                                         labels:(resources array:#('Cancel' 'Search as Matchpattern' 'Search Again'))
@@ -57789,6 +57789,7 @@
 
     "Modified: / 04-09-2013 / 17:39:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 28-11-2017 / 14:41:02 / cg"
+    "Modified: / 19-01-2018 / 11:50:57 / stefan"
 !
 
 askForMethodAndSpawnSearchTitle:title browserLabel:labelHolderOrBlock