From db7485a0cc66205399aa26ab0c505ab11f572b18 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Tue, 25 Mar 2025 15:13:16 +0100 Subject: [PATCH] * lisp/gnus/mm-encode.el (mm-default-buffer-type): Check `major-mode'. (cherry picked from commit a15534f32e1a978dee6ec96d6b60b5e755666e70) --- lisp/gnus/mm-encode.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/lisp/gnus/mm-encode.el b/lisp/gnus/mm-encode.el index 262b1c4d21c..021c56e26ef 100644 --- a/lisp/gnus/mm-encode.el +++ b/lisp/gnus/mm-encode.el @@ -109,10 +109,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 (and (stringp buffer) - (string-match-p - (rx (| "*Diff*" "*vc-diff*" "*ediff-diff*" "*ediff-custom-diff*")) - buffer)) + (if-let* ((buf (get-buffer buffer)) + ((eq (buffer-local-value 'major-mode buf) 'diff-mode))) "text/x-patch" "text/plain")) (defun mm-safer-encoding (encoding &optional type) -- 2.39.5