From: Katsumi Yamaoka Date: Thu, 22 Mar 2012 10:03:13 +0000 (+0000) Subject: gnus-msg.el (gnus-summary-resend-message): Don't encode encoded words in header when... X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=9f4d6d702b3b46c0c1dd93bc201d8e01f9f882ee gnus-msg.el (gnus-summary-resend-message): Don't encode encoded words in header when Gcc'ing resent mesage. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cd294d6e5..e408abb47 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-03-22 Katsumi Yamaoka + + * gnus-msg.el (gnus-summary-resend-message): Don't encode encoded words + in header when Gcc'ing resent mesage. + 2012-03-19 Lars Magne Ingebrigtsen * shr.el (shr-insert): Treat non-breaking space just like normal @@ -12,8 +17,8 @@ 2012-03-14 Christopher Schmidt - * gnus-msg.el (gnus-inews-do-gcc): Add gnus-gcc-pre-body-encode-hook - and gnus-gcc-post-body-encode-hook. + * gnus-msg.el (gnus-inews-do-gcc): Add gnus-gcc-pre-body-encode-hook + and gnus-gcc-post-body-encode-hook. 2012-03-10 Lars Magne Ingebrigtsen diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index ff250b8eb..e09f7281c 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -1357,9 +1357,12 @@ For the \"inline\" alternatives, also see the variable ;; `gnus-summary-resend-message-insert-gcc' must run last. (add-hook 'message-header-setup-hook 'gnus-summary-resend-message-insert-gcc t) - (add-hook 'message-sent-hook (if gnus-agent - 'gnus-agent-possibly-do-gcc - 'gnus-inews-do-gcc)) + (add-hook 'message-sent-hook + `(lambda () + (let ((rfc2047-encode-encoded-words nil)) + ,(if gnus-agent + '(gnus-agent-possibly-do-gcc) + '(gnus-inews-do-gcc))))) (dolist (article (gnus-summary-work-articles n)) (gnus-summary-select-article nil nil nil article) (with-current-buffer gnus-original-article-buffer