--- a/CharacterEncoder.st	Tue Jan 16 15:09:53 2018 +0100
+++ b/CharacterEncoder.st	Tue Jan 16 15:12:21 2018 +0100
@@ -1479,7 +1479,7 @@
 
 !CharacterEncoder methodsFor:'queries'!
 
-characterSize:codePoint
+characterSize:charOrCodePoint
     "return the number of bytes required to encode codePoint"
 
     ^ self subclassResponsibility
@@ -1652,10 +1652,10 @@
 
 !CharacterEncoder::InverseEncoder methodsFor:'queries'!
 
-characterSize:charOrcodePoint
+characterSize:charOrCodePoint
     "return the number of bytes required to encode codePoint"
 
-    ^ decoder characterSize:charOrcodePoint
+    ^ decoder characterSize:charOrCodePoint
 ! !
 
 !CharacterEncoder::InverseEncoder methodsFor:'stream support'!
@@ -1692,8 +1692,8 @@
 
 !CharacterEncoder::NullEncoder methodsFor:'queries'!
 
-characterSize:codePoint
-    ^ (Character value:codePoint) bytesPerCharacter
+characterSize:charOrCodePoint
+    ^ charOrCodePoint asCharacter bytesPerCharacter
 
     "
      NullEncoder basicNew characterSize:$a codePoint 
@@ -1766,11 +1766,11 @@
 
 !CharacterEncoder::TwoStepEncoder methodsFor:'queries'!
 
-characterSize:codePoint
+characterSize:charOrCodePoint
     "return the number of bytes required to encode codePoint"
 
     "/ naive; actually, we have to do a real encoding to get this info proper
-    ^ (encoder2 characterSize:codePoint)
+    ^ (encoder2 characterSize:charOrCodePoint)
 
     "Created: / 22-11-2012 / 13:07:47 / cg"
 !