--- a/CharacterEncoder.st	Tue Mar 09 01:11:42 2004 +0100
+++ b/CharacterEncoder.st	Tue Mar 09 01:14:18 2004 +0100
@@ -387,6 +387,7 @@
     EncoderClassesByName := Dictionary new.
     CachedEncoders := Dictionary new.
 
+    'iii1' printCR.
     "/ class decoded-name array-of-encodingNames
     #(
         (ASCII              unicode     ( ascii 'us-ascii' 'iso-ir-6' 'ibm-367' 'ms-cp367' 'cp367'  'iso646-us' 'ibm-cp367' ))
@@ -511,6 +512,7 @@
     ) triplesDo:[:className :decodesTo :encodesTo |
         |implClass dict|
 
+'iiiL' printCR.
         implClass := (Smalltalk at:#CharacterEncoderImplementations) at:className.
         implClass isNil ifTrue:[
             self halt:'missing encoder-class'
@@ -1196,7 +1198,7 @@
 !CharacterEncoder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoder.st,v 1.60 2004-03-09 00:11:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoder.st,v 1.61 2004-03-09 00:14:18 cg Exp $'
 ! !
 
 CharacterEncoder initialize!