From: yamaoka <yamaoka>
Date: Thu, 3 Dec 1998 08:44:09 +0000 (+0000)
Subject: * mime-edit.el (mime-edit-user-agent-value): Include `xemacs-betaname'.
X-Git-Tag: wemi-199812031900
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=596f9371330298709e01c56e5b99ae24d70eb14f;p=elisp%2Fsemi.git

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

diff --git a/ChangeLog b/ChangeLog
index 8f5d314..e640749 100644
--- 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'.
+
+
+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
--- 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 ")"))