Mercurial > emacs
changeset 92764:79b4e32b9b79
(reset-language-environment, set-language-environment-nonascii-translation):
Don't set-unibyte-charset.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Wed, 12 Mar 2008 17:48:00 +0000 |
parents | 5d8ccd2d65e2 |
children | 8a7561cc8360 |
files | lisp/ChangeLog lisp/international/mule-cmds.el |
diffstat | 2 files changed, 13 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Mar 12 15:26:49 2008 +0000 +++ b/lisp/ChangeLog Wed Mar 12 17:48:00 2008 +0000 @@ -1,5 +1,8 @@ 2008-03-12 Stefan Monnier <monnier@iro.umontreal.ca> + * international/mule-cmds.el (reset-language-environment) + (set-language-environment-nonascii-translation): Don't set-unibyte-charset. + * doc-view.el: Remove all cb-args, use closures instead. (doc-view-sentinel): Merge doc-view-dvi->pdf-sentinel, doc-view-ps->pdf-sentinel, and doc-view-pdf->txt-sentinel (which was
--- a/lisp/international/mule-cmds.el Wed Mar 12 15:26:49 2008 +0000 +++ b/lisp/international/mule-cmds.el Wed Mar 12 17:48:00 2008 +0000 @@ -1775,7 +1775,11 @@ ;; (set-terminal-coding-system-internal nil) ;; (set-keyboard-coding-system-internal nil) - (set-unibyte-charset 'iso-8859-1)) + ;; Back in Emacs-20, it was necessary to provide some fallback implicit + ;; conversion, because almost no packages handled coding-system issues. + ;; Nowadays it'd just paper over bugs. + ;; (set-unibyte-charset 'iso-8859-1) + ) (reset-language-environment) @@ -1964,7 +1968,11 @@ (or (and (charsetp nonascii) (get-charset-property nonascii :ascii-compatible-p)) (setq nonascii 'iso-8859-1)) - (set-unibyte-charset nonascii))) + ;; Back in Emacs-20, it was necessary to provide some fallback implicit + ;; conversion, because almost no packages handled coding-system issues. + ;; Nowadays it'd just paper over bugs. + ;; (set-unibyte-charset nonascii) + )) (defun set-language-environment-charset (language-name) "Do various charset setups for language environment LANGUAGE-NAME."