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
251ebe0f
Commit
251ebe0f
authored
Feb 22, 2011
by
Kenichi Handa
Browse files
In rmail, decode "encoded-words" of header components on replying.
parent
47301027
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
15 additions
and
0 deletions
+15
-0
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/mail/rmail.el
lisp/mail/rmail.el
+10
-0
No files found.
lisp/ChangeLog
View file @
251ebe0f
2011-02-22 Kenichi Handa <handa@m17n.org>
* mail/rmail.el (rmail-start-mail): Decode "encoded-words" of
header components.
2011-02-19 Kenichi Handa <handa@m17n.org>
* mail/rmailmm.el (rmail-mime-find-header-encoding): Be sure to
...
...
lisp/mail/rmail.el
View file @
251ebe0f
...
...
@@ -3449,6 +3449,16 @@ does not pop any summary buffer."
(
setq
yank-action
(
list
'insert-buffer
replybuffer
)))
(
setq
others
(
cons
(
cons
"cc"
cc
)
others
))
(
setq
others
(
cons
(
cons
"in-reply-to"
in-reply-to
)
others
))
(
setq
others
(
mapcar
#'
(
lambda
(
elt
)
(
cons
(
car
elt
)
(
if
(
stringp
(
cdr
elt
))
(
rfc2047-decode-string
(
cdr
elt
)))))
others
))
(
if
(
stringp
to
)
(
setq
to
(
rfc2047-decode-string
to
)))
(
if
(
stringp
in-reply-to
)
(
setq
in-reply-to
(
rfc2047-decode-string
in-reply-to
)))
(
if
(
stringp
cc
)
(
setq
cc
(
rfc2047-decode-string
cc
)))
(
if
(
stringp
subject
)
(
setq
subject
(
rfc2047-decode-string
subject
)))
(
if
same-window
(
compose-mail
to
subject
others
noerase
nil
...
...
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