* mime-edit.el (mime-edit-user-agent-value): Include `xemacs-betaname'.

diff --git a/ChangeLog b/ChangeLog
index 8f5d314..e640749 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 1998-12-03  Katsumi Yamaoka   <yamaoka@jpl.org>
 
+       * mime-edit.el (mime-edit-user-agent-value): Include
+       `xemacs-betaname'.
+
+\f
+1998-12-03  Katsumi Yamaoka   <yamaoka@jpl.org>
+
        * WEMI: Version 1.12.0 (Shimizu) released.
 
 1998-11-30  MORIOKA Tomohiko  <morioka@jaist.ac.jp>

diff --git a/mime-edit.el b/mime-edit.el
index 56ee40b..89b4655 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -633,6 +633,12 @@ If it is not specified for a major-mode,
                          (concat "/"
                                  (substring emacs-version 0
                                             (match-beginning 0))
+                                 (if (and (boundp 'xemacs-betaname)
+                                          ;; It does not exist in XEmacs
+                                          ;; versions prior to 20.3.
+                                          xemacs-betaname)
+                                     (concat " " xemacs-betaname)
+                                   "")
                                  " (" xemacs-codename ") ("
                                  system-configuration ")")
                        " (" emacs-version ")"))