mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-24 07:20:37 +00:00
(mm-display-external): Space prefix temp buffer
name. Don't disable undo explicitly.
This commit is contained in:
parent
5aa22ef9ad
commit
6eb681a320
@ -1,3 +1,11 @@
|
||||
2000-11-03 Dave Love <fx@gnu.org>
|
||||
|
||||
* gnus-cus.el (gnus-group-parameters) <gcc-self>: Fix custom type.
|
||||
<banner>: Fix custom type, doc.
|
||||
|
||||
* mm-decode.el (mm-display-external): Space prefix temp buffer
|
||||
name. Don't disable undo explicitly.
|
||||
|
||||
2000-11-02 Dave Love <fx@gnu.org>
|
||||
|
||||
* message.el (message-font-lock-keywords): Use [:alpha:] for
|
||||
|
@ -372,14 +372,13 @@ external if displayed external."
|
||||
(let ((cur (current-buffer)))
|
||||
(if (eq method 'mailcap-save-binary-file)
|
||||
(progn
|
||||
(set-buffer (generate-new-buffer "*mm*"))
|
||||
(set-buffer (generate-new-buffer " *mm*"))
|
||||
(setq method nil))
|
||||
(mm-insert-part handle)
|
||||
(let ((win (get-buffer-window cur t)))
|
||||
(when win
|
||||
(select-window win)))
|
||||
(switch-to-buffer (generate-new-buffer "*mm*")))
|
||||
(buffer-disable-undo)
|
||||
(switch-to-buffer (generate-new-buffer " *mm*")))
|
||||
(mm-set-buffer-file-coding-system mm-binary-coding-system)
|
||||
(insert-buffer-substring cur)
|
||||
(goto-char (point-min))
|
||||
|
Loading…
Reference in New Issue
Block a user