--- a/FontPanel.st	Fri Feb 20 11:38:07 2004 +0100
+++ b/FontPanel.st	Fri Feb 20 11:45:27 2004 +0100
@@ -606,7 +606,7 @@
                             enc notNil ifTrue:[
                                 encoder := CharacterEncoder encoderFor:enc ifAbsent:nil.
                                 encoder notNil ifTrue:[
-                                    userFriendlyName := encoder class userFriendlyNameOfEncoding.
+                                    userFriendlyName := encoder userFriendlyNameOfEncoding.
                                 ].
                             ].
                             (userFriendlyName notNil and:[userFriendlyName ~= enc]) ifTrue:[
@@ -983,5 +983,5 @@
 !FontPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.69 2004-02-18 23:04:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.70 2004-02-20 10:45:27 cg Exp $'
 ! !