# HG changeset patch # User Chong Yidong # Date 1160703671 0 # Node ID 43ccf7c7d312bc9e47c09a5474edcf492ba58c48 # Parent c51c8fa9c1f1fd91e57d2cb8bae1283eecb23ce6 * international/utf-8.el (utf-translate-cjk-load-tables): Avoid clobbering last-coding-system-used during load. diff -r c51c8fa9c1f1 -r 43ccf7c7d312 lisp/ChangeLog --- a/lisp/ChangeLog Thu Oct 12 23:00:44 2006 +0000 +++ b/lisp/ChangeLog Fri Oct 13 01:41:11 2006 +0000 @@ -1,3 +1,8 @@ +2006-10-12 Chong Yidong + + * international/utf-8.el (utf-translate-cjk-load-tables): Avoid + clobbering last-coding-system-used during load. + 2006-10-12 Carsten Dominik * textmodes/reftex-global.el (reftex-create-tags-file): Quote file diff -r c51c8fa9c1f1 -r 43ccf7c7d312 lisp/international/utf-8.el --- a/lisp/international/utf-8.el Thu Oct 12 23:00:44 2006 +0000 +++ b/lisp/international/utf-8.el Fri Oct 13 01:41:11 2006 +0000 @@ -309,7 +309,10 @@ ;; Here we bind coding-system-for-read to nil so that coding tags ;; in the files are respected even if the files are not yet ;; byte-compiled - (let ((coding-system-for-read nil)) + (let ((coding-system-for-read nil) + ;; We must avoid clobbering this variable, in case the load + ;; files below use different coding systems. + (last-coding-system-used last-coding-system-used)) (cond ((string= "Korean" current-language-environment) (load "subst-jis") (load "subst-big5")