# HG changeset patch # User Stefan Vogel # Date 1376133274 -7200 # Node ID 03984afbeca64e45695f0dd51dd5b16e69fd1051 # Parent cdec81bdc7a7da2e290a500db568ee950e2753ca class: ClassCategoryReader changed: #fileInFrom:notifying:passChunk:single:silent: use #position/#position: instead of #positionXBased diff -r cdec81bdc7a7 -r 03984afbeca6 ClassCategoryReader.st --- a/ClassCategoryReader.st Sat Aug 10 13:14:10 2013 +0200 +++ b/ClassCategoryReader.st Sat Aug 10 13:14:34 2013 +0200 @@ -169,7 +169,7 @@ !ClassCategoryReader class methodsFor:'others'! version_CVS - ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.53 2011-07-31 07:30:26 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.54 2013-08-10 11:14:34 stefan Exp $' ! ! !ClassCategoryReader methodsFor:'fileIn'! @@ -297,7 +297,7 @@ done := aStream atEnd. done ifFalse:[ canMakeSourceRef ifTrue:[ - pos := aStream position1Based + pos := aStream position + 1 ]. aString := aStream nextChunk. aStream skipSeparators. @@ -343,7 +343,7 @@ SourceMode == #sourceReference ifTrue:[ s := sourceFile asFilename appendingWriteStream. s setToEnd. - pos := s position1Based. + pos := s position + 1. s nextChunkPut:src. s close. ]. @@ -440,7 +440,8 @@ !ClassCategoryReader class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.53 2011-07-31 07:30:26 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/ClassCategoryReader.st,v 1.54 2013-08-10 11:14:34 stefan Exp $' ! ! + ClassCategoryReader initialize!