--- a/FontPanel.st	Fri Feb 20 11:45:27 2004 +0100
+++ b/FontPanel.st	Fri Feb 20 13:44:32 2004 +0100
@@ -603,7 +603,7 @@
     listPresentedToUser := listOfEncodings collect:[:enc |
                             |encoder userFriendlyName|
 
-                            enc notNil ifTrue:[
+                            (enc notNil and:[enc ~= '*']) ifTrue:[
                                 encoder := CharacterEncoder encoderFor:enc ifAbsent:nil.
                                 encoder notNil ifTrue:[
                                     userFriendlyName := encoder userFriendlyNameOfEncoding.
@@ -983,5 +983,5 @@
 !FontPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.70 2004-02-20 10:45:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/FontPanel.st,v 1.71 2004-02-20 12:44:32 cg Exp $'
 ! !