default encoding
authorClaus Gittinger <cg@exept.de>
Wed, 25 Feb 2004 21:20:14 +0100
changeset 5586 aba072239d9a
parent 5585 b902ecb72796
child 5587 20dbbff3bec9
default encoding
AbstractFileApplicationNoteBookComponent.st
FileApplicationNoteBook.st
FileBrowser.st
--- a/AbstractFileApplicationNoteBookComponent.st	Wed Feb 25 17:15:11 2004 +0100
+++ b/AbstractFileApplicationNoteBookComponent.st	Wed Feb 25 21:20:14 2004 +0100
@@ -116,7 +116,7 @@
 !
 
 fileEncodingHolder
-    ^ #'ascii'
+    ^ #'iso8859-1'
 !
 
 modeLabelHolder
@@ -244,5 +244,5 @@
 !AbstractFileApplicationNoteBookComponent class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileApplicationNoteBookComponent.st,v 1.11 2004-02-17 12:08:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileApplicationNoteBookComponent.st,v 1.12 2004-02-25 20:19:57 cg Exp $'
 ! !
--- a/FileApplicationNoteBook.st	Wed Feb 25 17:15:11 2004 +0100
+++ b/FileApplicationNoteBook.st	Wed Feb 25 21:20:14 2004 +0100
@@ -4546,7 +4546,7 @@
 
     fileEncoding := self fileEncoding.
 
-    fontsEncoding := editView font encoding ? 'ascii'.
+    fontsEncoding := editView font encoding ? 'iso8859-1'.
 
     preferredFontEncoding := FontDescription preferredFontEncodingFor:fileEncoding.
     (CharacterEncoder isEncoding:preferredFontEncoding subSetOf:fontsEncoding) ifFalse:[
@@ -5439,5 +5439,5 @@
 !FileApplicationNoteBook class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.154 2004-02-25 11:59:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.155 2004-02-25 20:19:47 cg Exp $'
 ! !
--- 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 $'
 ! !