--- a/CharacterEncoderImplementations__ISO10646_to_UTF16BE.st	Tue Jul 10 09:46:06 2012 +0200
+++ b/CharacterEncoderImplementations__ISO10646_to_UTF16BE.st	Tue Jul 10 09:55:08 2012 +0200
@@ -69,13 +69,13 @@
 !
 
 decodeString:aStringOrByteCollection
-    "given a byteArray (2-bytes per character) or unsignedShortArra in UTF16 encoding,
+    "given a byteArray (2-bytes per character) or unsignedShortArray in UTF16 encoding,
      return a new string containing the same characters, in 8, 16bit (or more) encoding.
      Returns either a normal String, a TwoByte- or a FourByte-String instance.
      Only useful, when reading from external sources.
      This only handles up-to 30bit characters."
 
-    |sz nBitsRequired s newString idx bitsPerElementIn nextIn
+    |s newString bitsPerElementIn nextIn
      codeIn codeIn1 codeIn2 estimatedSize out|
 
     aStringOrByteCollection isByteArray ifTrue:[
@@ -258,15 +258,15 @@
 !ISO10646_to_UTF16BE methodsFor:'queries'!
 
 nameOfEncoding
-    ^ #'utf8be'
+    ^ #utf16be
 ! !
 
 !ISO10646_to_UTF16BE class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO10646_to_UTF16BE.st,v 1.3 2009-11-04 00:46:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO10646_to_UTF16BE.st,v 1.4 2012-07-10 07:55:08 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO10646_to_UTF16BE.st,v 1.3 2009-11-04 00:46:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO10646_to_UTF16BE.st,v 1.4 2012-07-10 07:55:08 stefan Exp $'
 ! !