From: yamaoka Date: Fri, 2 Jul 1999 05:06:59 +0000 (+0000) Subject: (mime-edit-user-agent-value): Follow in the wake of remi-1_13 about X-Git-Tag: semi-1_13_5~5 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8883ccb6283b81f7178553b19d80a8e8ce270ef8;p=elisp%2Fsemi.git (mime-edit-user-agent-value): Follow in the wake of remi-1_13 about XEmacs UTF-2000-MULE. --- diff --git a/ChangeLog b/ChangeLog index 35a9096..75d3006 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,18 +1,13 @@ -1999-06-27 Katsumi Yamaoka +1999-06-17 MORIOKA Tomohiko - * mime-edit.el (mime-edit-user-agent-value): Include UTF-2000-MULE - version if it exists. + * mime-edit.el (mime-edit-user-agent-value): Modify for XEmacs + UTF-2000-MULE. 1999-06-04 MORIOKA Tomohiko * mime-edit.el (mime-edit-user-agent-value): Modify code to get version number of XEmacs. [cf. ] -1999-06-04 Katsumi Yamaoka - - * mime-edit.el (mime-edit-user-agent-value): Ignore parenthesis in - `emacs-version' for XEmacs 21.2.15. - 1999-05-31 Keiichi Suzuki * mime-play.el (mime-show-echo-buffer): Bind `buffer-read-only' to diff --git a/mime-edit.el b/mime-edit.el index 8e3da1f..c6229b8 100644 --- a/mime-edit.el +++ b/mime-edit.el @@ -632,10 +632,9 @@ If it is not specified for a major-mode, (mime-product-code-name mime-library-product) ") " (if (featurep 'xemacs) - (concat (cond ((boundp 'utf-2000-version) + (concat (cond ((featurep 'utf-2000) (concat "UTF-2000-MULE/" utf-2000-version)) - ((featurep 'mule) "MULE") - (t "")) + ((featurep 'mule) "MULE")) " XEmacs" (if (string-match "^[0-9]+\\(\\.[0-9]+\\)" emacs-version) (concat "/"