--- a/AbstractFileBrowser.st	Thu Oct 24 11:43:54 2002 +0200
+++ b/AbstractFileBrowser.st	Thu Oct 24 11:54:17 2002 +0200
@@ -1456,14 +1456,11 @@
 
     |item files|
 
-    item:= self firstCurrentSelectedItem.
-    item isNil ifTrue:[
-        files := self currentFileNameHolder value.
-        files notEmpty ifTrue:[
-            item := DirectoryContentsBrowser itemClass fileName:(files first).
-        ] ifFalse:[
-            item := DirectoryContentsBrowser itemClass fileName:(Filename homeDirectory asAbsoluteFilename).
-        ].
+    files := self currentFileNameHolder value.
+    files notEmpty ifTrue:[
+        item := DirectoryContentsBrowser itemClass fileName:(files first).
+    ] ifFalse:[
+        item := DirectoryContentsBrowser itemClass fileName:(Filename homeDirectory asAbsoluteFilename).
     ].
     self openSearchFileOn:item.
 !
@@ -4348,11 +4345,6 @@
     ^ (files select:[: file | file isDirectory not]).
 !
 
-firstCurrentSelectedItem
-
-    ^ self application:#DirectoryContentsBrowser do:#firstSelectedItem.
-!
-
 firstSelectedFile
 
     | files |
@@ -4878,5 +4870,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.27 2002-10-24 09:33:01 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.28 2002-10-24 09:54:17 penk Exp $'
 ! !