(mime-edit-user-agent-value): Modify for XEmacs UTF-2000-MULE.

diff --git a/mime-edit.el b/mime-edit.el
index 76a8343..c6229b8 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -632,7 +632,9 @@ If it is not specified for a major-mode,
          (mime-product-code-name mime-library-product)
          ") "
          (if (featurep 'xemacs)
-             (concat (if (featurep 'mule) "MULE")
+             (concat (cond ((featurep 'utf-2000)
+                            (concat "UTF-2000-MULE/" utf-2000-version))
+                           ((featurep 'mule) "MULE"))
                      " XEmacs"
                      (if (string-match "^[0-9]+\\(\\.[0-9]+\\)" emacs-version)
                          (concat "/"