--- a/FileSelectionBrowser.st	Sat Feb 20 02:24:34 1999 +0100
+++ b/FileSelectionBrowser.st	Sat Feb 20 02:26:52 1999 +0100
@@ -389,7 +389,7 @@
 
     self valueOfFileName value: aFileName.
     accept value: true.
-    self close
+    self closeRequest
 !
 
 readDirectory