changed: #askThenDo:
authorClaus Gittinger <cg@exept.de>
Wed, 26 Sep 2012 12:41:23 +0200
changeset 11812 15a7f2410d34
parent 11811 41a4ebfe2da2
child 11813 4b506523f3bc
changed: #askThenDo:
Tools_SearchDialog.st
--- a/Tools_SearchDialog.st	Wed Sep 26 11:58:28 2012 +0200
+++ b/Tools_SearchDialog.st	Wed Sep 26 12:41:23 2012 +0200
@@ -231,8 +231,8 @@
 askThenDo:aBlock 
     |where code sel matchHolderValue caseHolderValue|
 
+    self beScreenDialog.                "raise it above all windows"
     self open.
-    self beScreenDialog.                "raise it above all windows"
     self accepted ifFalse:[ 
         ^ self.
     ].
@@ -250,7 +250,7 @@
             (selectionList notNil and:[selectionList hasSelection]) ifTrue:[
                 sel := selectionList selectionValue.
             ] ifFalse:[
-                sel := selectorHolder value.
+                sel := selectorHolder value withoutSeparators.
             ].
             sel isEmptyOrNil ifTrue:[ 
                 browser warn:((searchWhat == #selector) 
@@ -338,7 +338,7 @@
         aBlock value.
     ]
 
-    "Modified: / 14-02-2012 / 14:12:49 / cg"
+    "Modified: / 26-09-2012 / 11:50:45 / cg"
 !
 
 setupToAskForMethodSearchTitle:title forBrowser:brwsrArg searchWhat:searchWhatArg 
@@ -1387,7 +1387,7 @@
 !SearchDialog class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.71 2012-08-20 11:35:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.72 2012-09-26 10:41:23 cg Exp $'
 ! !
 
 SearchDialog initialize!