Mercurial > emacs
changeset 92772:3637573105bd
(gnus-soup-send-packet): Don't use mm-with-unibyte-current-buffer
since the buffer is unibyte anyway.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 12 Mar 2008 18:49:53 +0000 |
| parents | a3d61f1532f1 |
| children | ca2ba2a312f0 |
| files | lisp/gnus/ChangeLog lisp/gnus/gnus-soup.el |
| diffstat | 2 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Wed Mar 12 18:44:07 2008 +0000 +++ b/lisp/gnus/ChangeLog Wed Mar 12 18:49:53 2008 +0000 @@ -1,5 +1,8 @@ 2008-03-12 Stefan Monnier <monnier@iro.umontreal.ca> + * gnus-soup.el (gnus-soup-send-packet): Don't use + mm-with-unibyte-current-buffer since the buffer is unibyte anyway. + * nnmh.el: Use with-current-buffer. (nnmh-request-list-1): Use mm-string-to-multibyte rather than mm-string-as-multibyte on the output of mm-encode-coding-string.
--- a/lisp/gnus/gnus-soup.el Wed Mar 12 18:44:07 2008 +0000 +++ b/lisp/gnus/gnus-soup.el Wed Mar 12 18:49:53 2008 +0000 @@ -594,9 +594,8 @@ (mail-fetch-field "to")) (sit-for 1) (let ((mail-header-separator "")) - (mm-with-unibyte-current-buffer - (funcall (or message-send-mail-real-function - message-send-mail-function))))) + (funcall (or message-send-mail-real-function + message-send-mail-function)))) (t (error "Unknown reply kind"))) (set-buffer msg-buf) @@ -610,5 +609,5 @@ (provide 'gnus-soup) -;;; arch-tag: eddfa69d-13e8-4aea-84ef-62a526ef185c +;; arch-tag: eddfa69d-13e8-4aea-84ef-62a526ef185c ;;; gnus-soup.el ends here