--- a/FileSelectionList.st	Fri Oct 10 19:34:59 1997 +0200
+++ b/FileSelectionList.st	Fri Oct 10 21:39:30 1997 +0200
@@ -619,7 +619,7 @@
     "set the lists contents to the filenames in the directory.
      This does not validate the change with any directoryChangeBlock."
 
-    |oldPath name|
+    |oldPath|
 
     nameOrDirectory isNil ifTrue:[
         directory := nil.
@@ -1000,5 +1000,5 @@
 !FileSelectionList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.39 1997-09-20 22:22:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FileSelectionList.st,v 1.40 1997-10-10 19:39:30 cg Exp $'
 ! !