--- a/Tools_SearchDialog.st	Sun Jul 04 16:29:23 2010 +0200
+++ b/Tools_SearchDialog.st	Sun Jul 04 16:30:55 2010 +0200
@@ -850,6 +850,7 @@
     inputField list:lastSearchPatterns.
     inputField selectAllInitially.
     inputField immediateAccept:true.
+    inputField takeFocus.
     inputField 
         entryCompletionBlock:[ :contents | 
             |s what|
@@ -1215,9 +1216,9 @@
 !SearchDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.52 2010-04-26 13:40:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.53 2010-07-04 14:30:55 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.52 2010-04-26 13:40:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_SearchDialog.st,v 1.53 2010-07-04 14:30:55 stefan Exp $'
 ! !