--- a/FileBrowser.st	Fri Mar 28 15:45:07 2003 +0100
+++ b/FileBrowser.st	Fri Mar 28 19:54:44 2003 +0100
@@ -5833,7 +5833,7 @@
 initialCommandFor:fileName into:aBox
     "set a useful initial command in execute-command box."
 
-    self class initialCommandFor:fileName in:currentDirectory intoBox:aBox.
+    AbstractFileBrowser initialCommandFor:fileName in:currentDirectory intoBox:aBox.
 !
 
 nonBinaryFileAction:aFilename
@@ -7821,5 +7821,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.527 2003-03-28 11:31:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.528 2003-03-28 18:54:44 cg Exp $'
 ! !