From 37b8de6acabc3ce5b8ca688face111e1d2278ced Mon Sep 17 00:00:00 2001 From: tomo Date: Mon, 28 Jun 1999 13:42:48 +0000 Subject: [PATCH] (set-language-environment-coding-systems): Use `set-coding-priority-list' instead of `set-coding-priority'; don't call `update-coding-systems-internal'. --- lisp/mule/mule-cmds.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/mule/mule-cmds.el b/lisp/mule/mule-cmds.el index f9ed5c8..7eb70d4 100644 --- a/lisp/mule/mule-cmds.el +++ b/lisp/mule/mule-cmds.el @@ -1234,11 +1234,12 @@ of buffer-file-coding-system set by this function." (coding-system-change-eol-conversion default-coding eol-type) default-coding)) (setq default-sendmail-coding-system default-coding) - (set-coding-priority categories) + (set-coding-priority-list categories) (while priority (set (car categories) (car priority)) (setq priority (cdr priority) categories (cdr categories))) - (update-coding-systems-internal))))) + ;; (update-coding-systems-internal) + )))) ;; Print all arguments with `princ', then print "\n". (defsubst princ-list (&rest args) -- 1.7.10.4