--- a/CharacterEncoderImplementations__TwoByteEncoder.st	Sun Feb 14 00:14:12 2016 +0100
+++ b/CharacterEncoderImplementations__TwoByteEncoder.st	Sun Feb 14 00:15:09 2016 +0100
@@ -66,22 +66,23 @@
 readNextCharacterFrom:aStream
     | c |
 
-    c := aStream nextUnsignedShortMSB:false.
+    c := aStream nextUnsignedInt16MSB:false.
     ^ c isNil 
         ifTrue: [nil]
         ifFalse: [(self decode:c) asCharacter]
 !
 
 readNextInputCharacterFrom:aStream
-    ^ aStream nextUnsignedShortMSB:false
+    ^ aStream nextUnsignedInt16MSB:false
 ! !
 
 !TwoByteEncoder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__TwoByteEncoder.st,v 1.6 2009-11-04 00:47:35 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__TwoByteEncoder.st,v 1.6 2009-11-04 00:47:35 cg Exp $'
+    ^ '$Header$'
 ! !
+