FindFileApplication.st
changeset 5010 27aa6fa93dcd
parent 4798 5db46dcc8a43
child 5140 36c7da05d814
--- a/FindFileApplication.st	Mon Jun 30 12:48:22 2003 +0200
+++ b/FindFileApplication.st	Mon Jun 30 15:24:18 2003 +0200
@@ -882,11 +882,11 @@
 
 !FindFileApplication methodsFor:'startup & release'!
 
-item:aItem
+item:anItem
 
     |file newPattern|
 
-    super item:aItem.
+    super item:anItem.
 
     file := self fileName.
     self searchDirectoryHolder value:(self getDirWithoutFileName:file).
@@ -894,7 +894,7 @@
     file isDirectory ifTrue:[
         newPattern := '*'.
     ] ifFalse:[
-        newPattern := '*.', aItem suffix.
+        newPattern := '*.', anItem suffix.
     ].
     self namePatternHolder value:newPattern.
     self enableStop value:false.
@@ -921,5 +921,5 @@
 !FindFileApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.12 2003-04-08 14:45:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.13 2003-06-30 13:24:17 cg Exp $'
 ! !