From fac11d899be24fa031c360fd20c038b9432853ec Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sun, 19 May 2019 20:26:48 +0200 Subject: [PATCH] (mml-generate-mime-1): Remove XEmacs compat code * lisp/gnus/mml.el (mml-generate-mime-1): Remove XEmacs compat code. --- lisp/gnus/mml.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el index b0b4fd0a54d..1df4e28f13d 100644 --- a/lisp/gnus/mml.el +++ b/lisp/gnus/mml.el @@ -702,9 +702,7 @@ be \"related\" or \"alternate\"." filename))))) (t (let ((contents (cdr (assq 'contents cont)))) - (if (if (featurep 'xemacs) - (string-match "[^\000-\377]" contents) - (multibyte-string-p contents)) + (if (multibyte-string-p contents) (progn (set-buffer-multibyte t) (insert contents) -- 2.39.2