(mml-generate-mime-1): Remove XEmacs compat code
* lisp/gnus/mml.el (mml-generate-mime-1): Remove XEmacs compat code.
This commit is contained in:
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user