procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

lisp/gnus/mm-encode.el (mm-default-buffer-type): Obey the mode hierarchy

Browse source
This commit is contained in:
Stefan Monnier 2025-03-25 11:23:48 -04:00
parent a15534f32e
commit e67f03bf35
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/gnus/mm-encode.el
View file

@ -110,7 +110,8 @@ This variable should never be set directly, but bound before a call to
(defun mm-default-buffer-type (buffer)
"Return a default content type for BUFFER, a buffer name."
(if-let* ((buf (get-buffer buffer))
((eq (buffer-local-value 'major-mode buf) 'diff-mode)))
((provided-mode-derived-p (buffer-local-value 'major-mode buf)
'diff-mode)))
"text/x-patch" "text/plain"))
(defun mm-safer-encoding (encoding &optional type)