Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
062ca6f6
Commit
062ca6f6
authored
Jan 31, 2009
by
Eli Zaretskii
Browse files
(rmail-redecode-body): Use eight-bit instead of obsolete
eight-bit-control and eight-bit-graphic.
parent
ae42a852
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
11 additions
and
7 deletions
+11
-7
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/mail/rmail.el
lisp/mail/rmail.el
+6
-7
No files found.
lisp/ChangeLog
View file @
062ca6f6
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.
...
...
lisp/mail/rmail.el
View file @
062ca6f6
...
...
@@ -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
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment