diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 8 | ||||
| -rw-r--r-- | lisp/gnus/mm-decode.el | 5 |
2 files changed, 10 insertions, 3 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index bec15d07a7d..4370db962b3 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2000-11-03 Dave Love <fx@gnu.org> | ||
| 2 | |||
| 3 | * gnus-cus.el (gnus-group-parameters) <gcc-self>: Fix custom type. | ||
| 4 | <banner>: Fix custom type, doc. | ||
| 5 | |||
| 6 | * mm-decode.el (mm-display-external): Space prefix temp buffer | ||
| 7 | name. Don't disable undo explicitly. | ||
| 8 | |||
| 1 | 2000-11-02 Dave Love <fx@gnu.org> | 9 | 2000-11-02 Dave Love <fx@gnu.org> |
| 2 | 10 | ||
| 3 | * message.el (message-font-lock-keywords): Use [:alpha:] for | 11 | * message.el (message-font-lock-keywords): Use [:alpha:] for |
diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index 84d393a2af0..0d5571a016f 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el | |||
| @@ -372,14 +372,13 @@ external if displayed external." | |||
| 372 | (let ((cur (current-buffer))) | 372 | (let ((cur (current-buffer))) |
| 373 | (if (eq method 'mailcap-save-binary-file) | 373 | (if (eq method 'mailcap-save-binary-file) |
| 374 | (progn | 374 | (progn |
| 375 | (set-buffer (generate-new-buffer "*mm*")) | 375 | (set-buffer (generate-new-buffer " *mm*")) |
| 376 | (setq method nil)) | 376 | (setq method nil)) |
| 377 | (mm-insert-part handle) | 377 | (mm-insert-part handle) |
| 378 | (let ((win (get-buffer-window cur t))) | 378 | (let ((win (get-buffer-window cur t))) |
| 379 | (when win | 379 | (when win |
| 380 | (select-window win))) | 380 | (select-window win))) |
| 381 | (switch-to-buffer (generate-new-buffer "*mm*"))) | 381 | (switch-to-buffer (generate-new-buffer " *mm*"))) |
| 382 | (buffer-disable-undo) | ||
| 383 | (mm-set-buffer-file-coding-system mm-binary-coding-system) | 382 | (mm-set-buffer-file-coding-system mm-binary-coding-system) |
| 384 | (insert-buffer-substring cur) | 383 | (insert-buffer-substring cur) |
| 385 | (goto-char (point-min)) | 384 | (goto-char (point-min)) |