Mercurial > hg > xemacs-beta
diff lisp/mule/mule-cmds.el @ 3769:fbf54025c136
[xemacs-hg @ 2006-12-30 17:04:26 by aidan]
Provide native-coding-systems for some language environments that didn't
have them.
author | aidan |
---|---|
date | Sat, 30 Dec 2006 17:04:32 +0000 |
parents | 6b2ef948e140 |
children | a0ef33811aa3 |
line wrap: on
line diff
--- a/lisp/mule/mule-cmds.el Fri Dec 29 22:50:53 2006 +0000 +++ b/lisp/mule/mule-cmds.el Sat Dec 30 17:04:32 2006 +0000 @@ -1093,7 +1093,7 @@ coding-system) 'coding-system (cons coding-system (cdr (assoc 'coding-system (cdr langenv))))) - 'coding-priority (cons (coding-system-category coding-system) + 'coding-priority (cons coding-system (cdr (assq 'coding-priority (cdr langenv)))))))) (defun get-language-environment-from-locale (locale)