CharacterEncoder.st
changeset 11374 1a61d6a991b9
parent 11316 0b2757774461
child 11975 7b37b4dbd66f
child 17711 39faaaf888b4
--- a/CharacterEncoder.st	Fri Nov 28 17:50:03 2008 +0100
+++ b/CharacterEncoder.st	Fri Nov 28 19:53:43 2008 +0100
@@ -1047,7 +1047,6 @@
                 (enc startsWith:'x-') ifTrue:[
                     enc := enc copyFrom:3.
                 ].
-                enc := enc asSymbolIfInterned.
                 encoderOrNil := self encoderFor:enc ifAbsent:nil.
                 encoderOrNil notNil ifTrue:[
                     ^ encoderOrNil nameOfEncoding
@@ -1548,7 +1547,7 @@
 !CharacterEncoder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoder.st,v 1.102 2008-11-05 16:38:45 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoder.st,v 1.103 2008-11-28 18:53:43 cg Exp $'
 ! !
 
 CharacterEncoder initialize!