--- a/FtpURI.st Mon Jun 03 20:40:19 2013 +0200
+++ b/FtpURI.st Tue Jun 04 12:15:13 2013 +0200
@@ -221,7 +221,7 @@
"skip all files with skipSuffix aka 'file.old'"
skipSuffix size == 0 ifFalse:[
- list := list select:[:baseName| (baseName endsWith:skipSuffix) not]
+ list := list reject:[:baseName| (baseName endsWith:skipSuffix) ]
].
list do:[:eachBaseName| |stream|
@@ -406,6 +406,6 @@
!FtpURI class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/FtpURI.st,v 1.18 2013-01-20 15:28:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/FtpURI.st,v 1.19 2013-06-04 10:15:13 cg Exp $'
! !