--- a/FileSelectionBrowser.st	Sat Jun 12 12:57:58 1999 +0200
+++ b/FileSelectionBrowser.st	Tue Jun 15 14:32:15 1999 +0200
@@ -342,7 +342,7 @@
 !
 
 setRootForFile:aFilename
-    |f root d parent|
+    |f root parent|
 
     f := aFilename asFilename.
     root := Filename rootDirectoryOnVolume:f volume.