aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/international/mule-cmds.el12
2 files changed, 13 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ef3495eada7..315d69af254 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
12008-03-12 Stefan Monnier <monnier@iro.umontreal.ca> 12008-03-12 Stefan Monnier <monnier@iro.umontreal.ca>
2 2
3 * international/mule-cmds.el (reset-language-environment)
4 (set-language-environment-nonascii-translation): Don't set-unibyte-charset.
5
3 * doc-view.el: Remove all cb-args, use closures instead. 6 * doc-view.el: Remove all cb-args, use closures instead.
4 (doc-view-sentinel): Merge doc-view-dvi->pdf-sentinel, 7 (doc-view-sentinel): Merge doc-view-dvi->pdf-sentinel,
5 doc-view-ps->pdf-sentinel, and doc-view-pdf->txt-sentinel (which was 8 doc-view-ps->pdf-sentinel, and doc-view-pdf->txt-sentinel (which was
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 45b3543b0ee..2ce56546bfe 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1775,7 +1775,11 @@ The default status is as follows:
1775 ;; (set-terminal-coding-system-internal nil) 1775 ;; (set-terminal-coding-system-internal nil)
1776 ;; (set-keyboard-coding-system-internal nil) 1776 ;; (set-keyboard-coding-system-internal nil)
1777 1777
1778 (set-unibyte-charset 'iso-8859-1)) 1778 ;; Back in Emacs-20, it was necessary to provide some fallback implicit
1779 ;; conversion, because almost no packages handled coding-system issues.
1780 ;; Nowadays it'd just paper over bugs.
1781 ;; (set-unibyte-charset 'iso-8859-1)
1782 )
1779 1783
1780(reset-language-environment) 1784(reset-language-environment)
1781 1785
@@ -1964,7 +1968,11 @@ Setting this variable directly does not take effect. See
1964 (or (and (charsetp nonascii) 1968 (or (and (charsetp nonascii)
1965 (get-charset-property nonascii :ascii-compatible-p)) 1969 (get-charset-property nonascii :ascii-compatible-p))
1966 (setq nonascii 'iso-8859-1)) 1970 (setq nonascii 'iso-8859-1))
1967 (set-unibyte-charset nonascii))) 1971 ;; Back in Emacs-20, it was necessary to provide some fallback implicit
1972 ;; conversion, because almost no packages handled coding-system issues.
1973 ;; Nowadays it'd just paper over bugs.
1974 ;; (set-unibyte-charset nonascii)
1975 ))
1968 1976
1969(defun set-language-environment-charset (language-name) 1977(defun set-language-environment-charset (language-name)
1970 "Do various charset setups for language environment LANGUAGE-NAME." 1978 "Do various charset setups for language environment LANGUAGE-NAME."