projects
/
elisp
/
semi.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
4af0c3e
)
(mime-edit-user-agent-value): Add a setting for XEmacs CHISE.
author
tomo
<tomo>
Fri, 12 Dec 2003 05:39:56 +0000
(
05:39
+0000)
committer
tomo
<tomo>
Fri, 12 Dec 2003 05:39:56 +0000
(
05:39
+0000)
mime-edit.el
patch
|
blob
|
history
diff --git
a/mime-edit.el
b/mime-edit.el
index
d9bb359
..
466effd
100644
(file)
--- a/
mime-edit.el
+++ b/
mime-edit.el
@@
-1,6
+1,7
@@
;;; mime-edit.el --- Simple MIME Composer for GNU Emacs
;;; mime-edit.el --- Simple MIME Composer for GNU Emacs
-;; Copyright (C) 1993,94,95,96,97,98,99,2000 Free Software Foundation, Inc.
+;; Copyright (C) 1993,94,95,96,97,98,99,2000,01,02,03
+;; Free Software Foundation, Inc.
;; Author: UMEDA Masanobu <umerin@mse.kyutech.ac.jp>
;; MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
;; Author: UMEDA Masanobu <umerin@mse.kyutech.ac.jp>
;; MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
@@
-650,7
+651,10
@@
If it is not specified for a major-mode,
(if (fboundp 'apel-version)
(concat (apel-version) " "))
(if (featurep 'xemacs)
(if (fboundp 'apel-version)
(concat (apel-version) " "))
(if (featurep 'xemacs)
- (concat (cond ((featurep 'utf-2000)
+ (concat (cond ((and (featurep 'chise)
+ (boundp 'xemacs-chise-version))
+ (concat "CHISE-MULE/" xemacs-chise-version))
+ ((featurep 'utf-2000)
(concat "UTF-2000-MULE/" utf-2000-version))
((featurep 'mule) "MULE"))
" XEmacs"
(concat "UTF-2000-MULE/" utf-2000-version))
((featurep 'mule) "MULE"))
" XEmacs"