--- a/FileURI.st Tue Dec 02 15:22:35 2014 +0100
+++ b/FileURI.st Tue Dec 02 15:22:43 2014 +0100
@@ -139,7 +139,7 @@
^ [
stream := file readStream.
- aBlock value:stream optionalValue:attributes
+ aBlock value:stream optionalArgument:attributes
] ensure:[
stream notNil ifTrue:[stream close]
].
@@ -227,7 +227,7 @@
attributes at:#uriInfo put:uri.
].
stream := eachFilename readStream.
- aBlock value:stream optionalValue:attributes.
+ aBlock value:stream optionalArgument:attributes.
] ensure:[
stream notNil ifTrue:[stream close]
].
@@ -271,7 +271,7 @@
^ [
stream := self asFilename writeStream.
- aBlock value:stream optionalValue:self class attributes
+ aBlock value:stream optionalArgument:self class attributes
] ensure:[
stream notNil ifTrue:[stream close]
].
@@ -330,7 +330,7 @@
].
stream := toFileName writeStream.
].
- aBlock value:stream optionalValue:self class attributes.
+ aBlock value:stream optionalArgument:self class attributes.
stream close.
doAtomic ifTrue:[
toFileName moveTo:fileName.
@@ -352,10 +352,10 @@
!FileURI class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.17 2013-01-20 15:28:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.18 2014-12-02 14:22:43 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.17 2013-01-20 15:28:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic2/FileURI.st,v 1.18 2014-12-02 14:22:43 stefan Exp $'
! !