diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2009-09-09 09:28:43 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2009-09-09 09:28:43 +0000 |
| commit | de0bdfe7aa97030b6174aba37f245c2bbf2d4ee5 (patch) | |
| tree | d7955a763d1bb94432682f813ee6cc4eedb76bf5 /lisp/gnus/mml.el | |
| parent | f9b7b5acb56f3d7a785d079eb13318e33bca9047 (diff) | |
| download | emacs-de0bdfe7aa97030b6174aba37f245c2bbf2d4ee5.tar.gz | |
2009-09-09 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-util.el (gnus-float-time): Alias to float-time if it exists.
* ecomplete.el (with-no-warnings): Define it for old Emacsen.
(ecomplete-add-item): Don't use (featurep 'xemacs) to check if
float-time is available; suppress compile warning for time-to-seconds.
2009-09-07 Katsumi Yamaoka <yamaoka@jpl.org>
* mm-encode.el (mm-encode-buffer): Don't force 7bit encoding since MTA
may break data. Suggested by Dmitri Paduchikh <dpaduch@k66.ru>.
Add the optional argument `encoding' that overrides the default.
* mml.el (mml-generate-mime-1): Pass encoding defined by a user to
mm-encode-buffer.
2009-09-02 Karl Kleinpaste <karl@kleinpaste.org>
* gnus-art.el (gnus-article-read-summary-keys):
Fix gnus-buffer-configuration's value temporarily used.
Diffstat (limited to 'lisp/gnus/mml.el')
| -rw-r--r-- | lisp/gnus/mml.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el index bac8a5aaaf0..f397ef2b479 100644 --- a/lisp/gnus/mml.el +++ b/lisp/gnus/mml.el @@ -585,7 +585,9 @@ If MML is non-nil, return the buffer up till the correspondent mml tag." (unless raw (setq charset (mm-encode-body charset)))) (insert contents))))) - (setq encoding (mm-encode-buffer type) + (if (setq encoding (cdr (assq 'encoding cont))) + (setq encoding (intern (downcase encoding)))) + (setq encoding (mm-encode-buffer type encoding) coded (mm-string-as-multibyte (buffer-string)))) (mml-insert-mime-headers cont type charset encoding nil) (insert "\n" coded)))) |