[Emacs-diffs] emacs/lisp/mail rmail.el

[Eli Zaretskii]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Eli Zaretskii <eliz>    09/01/31 18:52:36

Modified files:
        lisp/mail      : rmail.el 

Log message:
        (rmail-redecode-body): Use eight-bit instead of obsolete
        eight-bit-control and eight-bit-graphic.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mail/rmail.el?cvsroot=emacs&r1=1.487&r2=1.488

Patches:
Index: rmail.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/mail/rmail.el,v
retrieving revision 1.487
retrieving revision 1.488
diff -u -b -r1.487 -r1.488
--- rmail.el    31 Jan 2009 13:31:45 -0000      1.487
+++ rmail.el    31 Jan 2009 18:52:36 -0000      1.488
@@ -2722,14 +2722,13 @@
                 (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
+                                 (delq 'eight-bit
                                              (find-charset-region
-                                              (point-min) (point-max))))))
+                                        (point-min) (point-max)))))
                    0)
                 (encode-coding-region (point-min) (point-max) old-coding))
            (decode-coding-region (point-min) (point-max) coding)