The Trunk: Files-ul.78.mcz

Levente Uzonyi uploaded a new version of Files to project The Trunk:
http://source.squeak.org/trunk/Files-ul.78.mcz

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

Name: Files-ul.78
Author: ul
Time: 27 March 2010, 12:20:40.764 am
UUID: 5b4a731c-a887-5848-8286-bf06bac4865d
Ancestors: Files-nice.77

- don't try to set the position of the file if it's not possible

=============== Diff against Files-nice.77 ===============

Item was changed:
  ----- Method: RemoteString>>text (in category 'accessing') -----
  text
  "Answer the receiver's string asText if remote files are enabled."
  | theFile |
  (sourceFileNumber == nil or: [(SourceFiles at: sourceFileNumber) == nil]) ifTrue: [^ nil].
  theFile := SourceFiles at: sourceFileNumber.
+ filePositionHi > theFile size ifTrue: [
- theFile position: filePositionHi.
- theFile position > theFile size ifTrue: [
  self error: 'RemoteString past end of file' ].
+ ^theFile
+ position: filePositionHi;
+ nextChunkText!
- ^ theFile nextChunkText!