--- 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!