# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1364489339 -3600
# Node ID 458c68d41bbd3568e09d1fd9b72637825a1f32cf
# Parent  11b2d9fb65545ab03d9f856cb3f68640e446849c
class: AbstractFileFinderApplicationComponent
changed: #fileDoubleClick:
focus to text

diff -r 11b2d9fb6554 -r 458c68d41bbd AbstractFileFinderApplicationComponent.st
--- a/AbstractFileFinderApplicationComponent.st	Thu Mar 28 16:26:43 2013 +0100
+++ b/AbstractFileFinderApplicationComponent.st	Thu Mar 28 17:48:59 2013 +0100
@@ -365,6 +365,7 @@
     app notNil ifTrue:[
         openedAppl := app openApplForFile:file.
         (openedAppl notNil and:[openedAppl isTextEditor]) ifTrue:[
+            openedAppl window assignKeyboardFocusToFirstInputField.    "/ should this be done in openApplForFile?
             contentsPattern := self contentsPatternHolder value.
             (contentsPattern notNil and:[ contentsPattern notEmpty and:[contentsPattern ~= '*']]) ifTrue:[
                 openedAppl searchForPattern:contentsPattern ignoreCase:(self ignoreCaseInContents value).
@@ -477,10 +478,10 @@
 !AbstractFileFinderApplicationComponent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.8 2013-01-26 21:27:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.9 2013-03-28 16:48:59 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.8 2013-01-26 21:27:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileFinderApplicationComponent.st,v 1.9 2013-03-28 16:48:59 cg Exp $'
 ! !