The Trunk: Files-eem.133.mcz

Eliot Miranda uploaded a new version of Files to project The Trunk:
http://source.squeak.org/trunk/Files-eem.133.mcz

==================== Summary ====================

Name: Files-eem.133
Author: eem
Time: 30 April 2014, 6:41:39.825 pm
UUID: 19b3579e-84ed-47a1-bebc-b6510682da41
Ancestors: Files-eem.132

Make sure nextPutAll: still loads buffer1 at: 1, so that e.g.
peekLast works as expected.
The test is

        (((MultiByteFileStream forceNewFileNamed: aFilename)
                        lineEndConvention: #lf;
                        yourself)
                nextPut: Character tab; nextPut: Character cr;
                peekLast) == Character cr

This fails before the change, answering Chartacter tab.

=============== Diff against Files-eem.132 ===============

Item was changed:
  ----- Method: StandardFileStream>>nextPutAll: (in category 'read, write, position') -----
  nextPutAll: aString
  "Write all the characters of the given string to this file."
+ | size |
-
  rwmode ifFalse: [^ self error: 'Cannot write a read-only file'].
  collection ifNotNil: [
  position < readLimit ifTrue: [ self flushReadBuffer ] ].
+ (size := aString size) > 0 ifTrue:
+ [buffer1 at: 1 put: (aString at: size).
+ self primWrite: fileID from: aString startingAt: 1 count: aString basicSize].
- self primWrite: fileID from: aString startingAt: 1 count: aString basicSize.
  ^ aString
  !