Mercurial > emacs
changeset 50535:32b881425e3d
(sort-coding-systems): Lower the
priorities of all utf-16 base coding systems.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 11 Apr 2003 00:41:40 +0000 |
parents | a3dafc05fe67 |
children | 0d62453c3da8 |
files | lisp/international/mule-cmds.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el Thu Apr 10 16:31:00 2003 +0000 +++ b/lisp/international/mule-cmds.el Fri Apr 11 00:41:40 2003 +0000 @@ -430,8 +430,8 @@ ;; Lower utf-16 priority so that we ;; normally prefer utf-8 to it, and put ;; x-ctext below that. - (cond ((or (eq base 'mule-utf-16-le) - (eq base 'mule-utf-16-be)) + (cond ((string-match "utf-16" + (symbol-name mime)) 16) ((string-match "^x-" (symbol-name mime)) 8)