--- a/CharacterEncoder.st	Thu Nov 05 14:41:30 2009 +0000
+++ b/CharacterEncoder.st	Wed Dec 02 21:30:55 2009 +0000
@@ -1343,11 +1343,11 @@
 !
 
 readNextCharacterFrom:aStream
-    "raise an error: must be redefined in concrete subclass(es)"
+    ^ (self encode:(self readNextInputCharacterFrom:aStream)) asCharacter
+!
 
-    ^ self subclassResponsibility
-
-    "Created: / 14-06-2005 / 17:02:28 / janfrog"
+readNextInputCharacterFrom:aStream
+    self subclassResponsibility
 ! !
 
 !CharacterEncoder::CompoundEncoder class methodsFor:'documentation'!
@@ -1458,6 +1458,18 @@
 	nextPutAll:(decoder nameOfDecodedCode)
 ! !
 
+!CharacterEncoder::InverseEncoder methodsFor:'queries'!
+
+characterSize:charOrcodePoint
+    ^ decoder characterSize:charOrcodePoint
+! !
+
+!CharacterEncoder::InverseEncoder methodsFor:'stream support'!
+
+readNextInputCharacterFrom:aStream
+    ^ decoder readNextInputCharacterFrom:aStream
+! !
+
 !CharacterEncoder::NullEncoder class methodsFor:'documentation'!
 
 documentation
@@ -1573,8 +1585,13 @@
 !CharacterEncoder class methodsFor:'documentation'!
 
 version
-    ^ '$Id: CharacterEncoder.st 10473 2009-10-24 15:48:19Z vranyj1 $'
+    ^ '$Id: CharacterEncoder.st 10480 2009-12-02 21:30:55Z vranyj1 $'
+!
+
+version_CVS
+    ^ '§Header: /cvs/stx/stx/libbasic/CharacterEncoder.st,v 1.105 2009/11/04 00:47:50 cg Exp §'
 ! !
 
 CharacterEncoder initialize!
 
+