aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2000-11-03 15:51:16 +0000
committerDave Love2000-11-03 15:51:16 +0000
commit6eb681a3209a8d95d976b8a88b4a060f24a531cc (patch)
treeab2406e3e405cee31d052e0665ec4c46c1da6473
parent5aa22ef9adea53badd9118e4548f8892a886be66 (diff)
downloademacs-6eb681a3209a8d95d976b8a88b4a060f24a531cc.tar.gz
emacs-6eb681a3209a8d95d976b8a88b4a060f24a531cc.zip
(mm-display-external): Space prefix temp buffer
name. Don't disable undo explicitly.
-rw-r--r--lisp/gnus/ChangeLog8
-rw-r--r--lisp/gnus/mm-decode.el5
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 @@
12000-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
12000-11-02 Dave Love <fx@gnu.org> 92000-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))