--- a/FileURI.st Thu Aug 12 15:28:14 2010 +0200
+++ b/FileURI.st Thu Aug 12 15:28:30 2010 +0200
@@ -232,7 +232,8 @@
stream notNil ifTrue:[stream close]
].
- renameBlock notNil ifTrue:[ |renameFilenameString|
+ renameBlock notNil ifTrue:[
+ |renameFilenameString|
renameFilenameString := renameBlock value:eachFilename pathName.
renameFilenameString asFilename exists ifTrue:[
renameFilenameString := renameFilenameString, '.',
@@ -351,9 +352,9 @@
!FileURI class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.15 2010-08-12 10:32:06 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.16 2010-08-12 13:28:30 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.15 2010-08-12 10:32:06 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.16 2010-08-12 13:28:30 stefan Exp $'
! !