--- a/ApplicationBuilder.st	Thu Apr 16 19:02:35 1998 +0200
+++ b/ApplicationBuilder.st	Fri Apr 17 00:05:50 1998 +0200
@@ -760,7 +760,6 @@
     ((selectedFile := FileSelectionBrowser
         request: 'Select Your ', whichFile, ' File' 
         fileName: currentFile value
-        inDirectory: currentFile value
         withFileFilters: #('*.c')) notNil and:
     [selectedFile asFilename exists and: [selectedFile asFilename isDirectory not]]) 
         ifTrue: [currentFile value: selectedFile]
@@ -796,7 +795,6 @@
     ((selectedFile := FileSelectionBrowser
         request: 'Select Your ', whichFile, ' File' 
         fileName: currentFile value
-        inDirectory: currentFile value
         withFileFilters: #('*.*o' '*.a')) notNil and:
     [selectedFile asFilename exists and: [selectedFile asFilename isDirectory not]]) 
         ifTrue: [currentFile value: selectedFile]
@@ -1304,5 +1302,5 @@
 !ApplicationBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ApplicationBuilder.st,v 1.2 1998-04-02 19:02:02 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ApplicationBuilder.st,v 1.3 1998-04-16 22:05:50 tz Exp $'
 ! !