--- a/FileBrowser.st	Thu Jun 18 14:48:12 1998 +0200
+++ b/FileBrowser.st	Thu Jun 18 14:59:42 1998 +0200
@@ -4029,6 +4029,18 @@
 
 !FileBrowser methodsFor:'queries'!
 
+fileName
+    "return my current fileName"
+
+    ^ self path asFilename construct:currentFileName
+
+    "
+     (FileBrowser openOnFileNamed:'Makefile') fileName
+    "
+
+    "Modified: / 18.6.1998 / 14:58:54 / cg"
+!
+
 path
     "return my currentDirectories pathName;
      sent from the pathField to aquire the pathname when I changed directory"
@@ -4043,5 +4055,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.226 1998-06-17 09:27:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.227 1998-06-18 12:59:42 cg Exp $'
 ! !