--- a/TextView.st	Fri May 13 20:20:00 2016 +0200
+++ b/TextView.st	Sun May 15 06:58:45 2016 +0200
@@ -333,16 +333,16 @@
     ^ Dictionary new addPairsFrom:#(
 
 #matchSearch
-'Search for a pattern (glob) as opposed to a direct string search'
+'Search for a pattern (GLOB) as opposed to a direct string search'
 
 #searchCaseSensitive
 'Care for case differences'
 
 #searchFullWord
-'Search only for full words (ignore occurrences as substring)'
+'Search only for full words (ignore occurrences in substring)'
 
 #searchAtBeginOfLineOnly
-'Search only for the string at the beginning if a line'
+'Search only for the string at the beginning of a line'
 
 #searchPattern
 'String or match-pattern to be searched'
@@ -351,7 +351,7 @@
 'Search only for that variable name (ignore occurrences in other contexts)'
 
 #replaceText
-'If checked, matching text is replaced by this (everywhere)'
+'If checked, matching text is replaced by this'
 
 #selectLines
 'If checked, lines containing the matched string are selected.'
@@ -366,7 +366,7 @@
 'Wrap around at the end of the text, and continue the search from the top'
 
 #matchWithRegex
-'Use regex pattern for search (as opposed to glob pattern)'
+'Use regex pattern for search (as opposed to GLOB pattern)'
 )
 ! !
 
@@ -2246,7 +2246,10 @@
         (modal not
         and:[ searchBox window realized ]) ifTrue:[
             "/ reuse it.
-            searchBox raiseDeiconified.
+            searchBox window 
+                raiseDeiconified;
+                requestFocus;
+                assignKeyboardFocusToFirstKeyboardConsumer.
             ^ self.
         ].    
         searchBox closeRequest.