From 6b6c69ed9f251a7b6ea673e2c7ea3ba90e2e70a0 Mon Sep 17 00:00:00 2001 From: ari Date: Wed, 21 May 2003 03:47:53 +0000 Subject: [PATCH] * lisp/gnus-msg.el (gnus-message-make-user-agent): Don't use `@' for rfc2616 compliance. --- ChangeLog | 5 +++++ lisp/gnus-msg.el | 8 ++++---- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index e9c55d7..153ca5d 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2003-05-21 ARISAWA Akihiro + + * lisp/gnus-msg.el (gnus-message-make-user-agent): Don't use `@' + for rfc2616 compliance. + 2003-05-20 Katsumi Yamaoka * lisp/gnus-msg.el (gnus-message-make-user-agent): Check whether diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index eae75ad..68d32a8 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -1178,10 +1178,10 @@ begin to compose a message: nil) ((string-match "^\\(\\([.0-9]+\\)*\\)\\.[0-9]+$" emacs-version) - (concat (if (boundp 'MULE) - "Mule/2.3@" - "Emacs/") - (match-string 1 emacs-version) + (concat (format (if (boundp 'MULE) + "Mule/2.3 (based on Emacs %s)" + "Emacs/%s") + (match-string 1 emacs-version)) (if system-v (concat " (" system-v ")") ""))) -- 1.7.10.4