diff options
| author | Stefan Monnier | 2008-04-05 20:14:17 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2008-04-05 20:14:17 +0000 |
| commit | 33e2f72c04be3ff98e7ef5895b0fe5e0f7bc14ed (patch) | |
| tree | bc0665a4dec1cd2cb671a5fdfd7c18d3e88bdd50 | |
| parent | 75eda25b52362116c1b5ddc71f122ccf2c1515f1 (diff) | |
| download | emacs-33e2f72c04be3ff98e7ef5895b0fe5e0f7bc14ed.tar.gz emacs-33e2f72c04be3ff98e7ef5895b0fe5e0f7bc14ed.zip | |
(nnheader-init-server-buffer): Change buffer's multibyteness
after rather than before erasing it.
| -rw-r--r-- | lisp/gnus/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/gnus/nnheader.el | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 7cfa5358c63..028a015a279 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2008-04-05 Stefan Monnier <monnier@iro.umontreal.ca> | 1 | 2008-04-05 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 2 | ||
| 3 | * nnheader.el (nnheader-init-server-buffer): Change buffer's multibyteness | ||
| 4 | after rather than before erasing it. | ||
| 5 | |||
| 3 | * gnus-art.el (gnus-mime-replace-part): Remove unnecessary use of | 6 | * gnus-art.el (gnus-mime-replace-part): Remove unnecessary use of |
| 4 | mm-with-multibyte. | 7 | mm-with-multibyte. |
| 5 | (gnus-request-article-this-buffer): Make sure the proper decoding is used | 8 | (gnus-request-article-this-buffer): Make sure the proper decoding is used |
diff --git a/lisp/gnus/nnheader.el b/lisp/gnus/nnheader.el index 7bb573a4950..15e6a6c093f 100644 --- a/lisp/gnus/nnheader.el +++ b/lisp/gnus/nnheader.el | |||
| @@ -575,8 +575,8 @@ the line could be found." | |||
| 575 | (unless (gnus-buffer-live-p nntp-server-buffer) | 575 | (unless (gnus-buffer-live-p nntp-server-buffer) |
| 576 | (setq nntp-server-buffer (get-buffer-create " *nntpd*"))) | 576 | (setq nntp-server-buffer (get-buffer-create " *nntpd*"))) |
| 577 | (with-current-buffer nntp-server-buffer | 577 | (with-current-buffer nntp-server-buffer |
| 578 | (mm-enable-multibyte) | ||
| 579 | (erase-buffer) | 578 | (erase-buffer) |
| 579 | (mm-enable-multibyte) | ||
| 580 | (kill-all-local-variables) | 580 | (kill-all-local-variables) |
| 581 | (setq case-fold-search t) ;Should ignore case. | 581 | (setq case-fold-search t) ;Should ignore case. |
| 582 | (set (make-local-variable 'nntp-process-response) nil) | 582 | (set (make-local-variable 'nntp-process-response) nil) |