procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(rmail-redecode-body): Use eight-bit instead of obsolete

Browse source 
eight-bit-control and eight-bit-graphic.
This commit is contained in:
Eli Zaretskii 2009-01-31 18:53:50 +00:00
parent ae42a85288
commit 062ca6f69a
2 changed files with 11 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2009-01-31 Eli Zaretskii <eliz@gnu.org>
* mail/rmail.el (rmail-redecode-body): Use eight-bit instead of
obsolete eight-bit-control and eight-bit-graphic.
2009-01-31 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/elp.el (elp-results-symname-map): Add follow-link.

13
lisp/mail/rmail.el
View file

@ -2722,14 +2722,13 @@ iso-8859, koi8-r, etc."
(not (coding-system-equal
(coding-system-base old-coding)
(coding-system-base coding)))
;; If the body includes only eight-bit-*
;; characters, encoding might fail, e.g. with
;; UTF-8, and isn't needed anyway.
;; If the body includes only eight-bit characters,
;; encoding might fail, e.g. with UTF-8, and isn't
;; needed anyway.
(> (length (delq 'ascii
(delq 'eight-bit-graphic
(delq 'eight-bit-control
(find-charset-region
(point-min) (point-max))))))
(delq 'eight-bit
(find-charset-region
(point-min) (point-max)))))
0)
(encode-coding-region (point-min) (point-max) old-coding))
(decode-coding-region (point-min) (point-max) coding)