[Pkg] Squeak3.11 Contributions: MethodAuthorship-mtf.20.mcz
squeak-dev-noreply at lists.squeakfoundation.org
squeak-dev-noreply at lists.squeakfoundation.org
Mon Feb 9 23:28:13 UTC 2009
A new version of MethodAuthorship was added to project Squeak3.11 Contributions:
http://www.squeaksource.com/311/MethodAuthorship-mtf.20.mcz
==================== Summary ====================
Name: MethodAuthorship-mtf.20
Author: mtf
Time: 9 February 2009, 6:28:05 pm
UUID: 24613612-a2b4-4d42-a01e-947eed2fc642
Ancestors: MethodAuthorship-mtf.19
hack FileStream to pass absolute paths to filePlugin even if it stores a relative path. Evil.
=============== Diff against MethodAuthorship-mtf.19 ===============
Item was added:
+ ----- Method: StandardFileStream>>open:forWrite: (in category '*methodauthorship-override') -----
+ open: fileName forWrite: writeMode
+ "Open the file with the given name. If writeMode is true, allow writing, otherwise open the file in read-only mode."
+ "Changed to do a GC and retry before failing ar 3/21/98 17:25"
+ | f |
+ f := (self class fullName: fileName) asVmPathName.
+
+ fileID := StandardFileStream retryWithGC:[self primOpen: f writable: writeMode]
+ until:[:id| id notNil]
+ forFileNamed: fileName.
+ fileID ifNil: [^ nil]. "allows sender to detect failure"
+ self register.
+ name := fileName.
+ rwmode := writeMode.
+ buffer1 := String new: 1.
+ !
More information about the Packages
mailing list