--- a/FileBrowser.st	Fri Mar 28 10:05:13 2003 +0100
+++ b/FileBrowser.st	Fri Mar 28 12:31:30 2003 +0100
@@ -6206,7 +6206,7 @@
 
     |fe|
 
-    fe := MIMETypes fontForCharset:fileEncoding.
+    fe := FontDescription fontNamePatternForCharset:fileEncoding.
     fe notNil ifTrue:[^ fe].
     ^ 'iso8859*'
 
@@ -7821,5 +7821,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.526 2003-03-18 11:21:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.527 2003-03-28 11:31:30 cg Exp $'
 ! !