--- a/FileBrowser.st Wed Feb 25 17:15:11 2004 +0100
+++ b/FileBrowser.st Wed Feb 25 21:20:14 2004 +0100
@@ -1526,7 +1526,7 @@
1 to:n do:[:i |
(buffer at:i) isPrintable ifFalse:[binary := true].
].
- binary ifFalse:[ ^ #'ascii' ].
+ binary ifFalse:[ ^ #'iso8859-1' ].
"/ look for JIS7 / EUC encoding
@@ -6159,7 +6159,7 @@
(self nonBinaryFileAction:fileNameString) ifTrue:[^ self].
].
- fontsEncoding := subView font encoding ? 'ascii'.
+ fontsEncoding := subView font encoding ? 'iso8859-1'.
pref := FontDescription preferredFontEncodingFor:guess.
ok := CharacterEncoder isEncoding:pref subSetOf:fontsEncoding.
@@ -7507,5 +7507,5 @@
!FileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.581 2004-02-23 13:27:56 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.582 2004-02-25 20:20:14 cg Exp $'
! !