;;;
(when (featurep 'utf-2000)
- (setq default-preferred-coded-charset-list
+ (setq default-coded-charset-priority-list
'(ascii
control-1
latin-iso8859-1
latin-iso8859-4
latin-iso8859-9
latin-jisx0201
+ cyrillic-iso8859-5
+ greek-iso8859-7
+ thai-tis620
+ hebrew-iso8859-8
vietnamese-viscii-lower
vietnamese-viscii-upper)))