From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 19 May 2019 18:26:48 +0000 (+0200)
Subject: (mml-generate-mime-1): Remove XEmacs compat code
X-Git-Tag: emacs-27.0.90~2815
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fac11d899be24fa031c360fd20c038b9432853ec;p=emacs.git

(mml-generate-mime-1): Remove XEmacs compat code

* lisp/gnus/mml.el (mml-generate-mime-1): Remove XEmacs compat code.
---

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)