mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Use better attachment defaults for *diff* buffers

Browse source 
* lisp/gnus/mm-encode.el (mm-default-buffer-type): New defun.

* lisp/gnus/mml.el (mml-attach-buffer): Use it.
This commit is contained in:
Michael Albinus 2025-03-25 11:45:29 +01:00
parent d6c7a77465
commit 2adc912d0e
2 changed files with 10 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/gnus/mml.el
View file

@ -1508,7 +1508,8 @@ FILENAME is a suggested file name for the attachment should a
recipient wish to save a copy separate from the message."
(interactive
(let* ((buffer (read-buffer "Attach buffer: "))
(type (mml-minibuffer-read-type buffer "text/plain"))
(type (mml-minibuffer-read-type
buffer (mm-default-buffer-type buffer)))
(description (mml-minibuffer-read-description))
(disposition (mml-minibuffer-read-disposition type nil)))
(list buffer type description disposition)))