Mercurial > hg > xemacs-beta

diff lisp/mule/mule-coding.el @ 448:3078fd1074e8 r21-2-39

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-39
author cvs
date Mon, 13 Aug 2007 11:38:25 +0200
parents 576fb035e263
children 7039e6323819
line wrap: on
line diff
--- a/lisp/mule/mule-coding.el	Mon Aug 13 11:37:23 2007 +0200
+++ b/lisp/mule/mule-coding.el	Mon Aug 13 11:38:25 2007 +0200
@@ -174,9 +174,19 @@
 ;; initialize the coding categories to something semi-reasonable
 ;; so that the remaining Lisp files can contain extended characters.
 ;; (They will be in ISO-7 format)
+;; #### This list needs to be synched with the ones in mule-cmds.el.
 
-(set-coding-priority-list '(iso-8-2 iso-8-designate iso-8-1
-			    iso-7 iso-lock-shift no-conversion))
+(set-coding-priority-list '(iso-7
+	    no-conversion
+	    ;; utf-8
+	    iso-8-1
+	    iso-8-2
+	    iso-8-designate
+	    iso-lock-shift
+	    shift-jis
+	    big5
+	    ;; ucs-4
+	    ))
 
 (set-coding-category-system 'iso-7 'iso-2022-7)
 (set-coding-category-system 'iso-8-designate 'ctext)