From: yamaoka <yamaoka>
Date: Wed, 1 Oct 2003 22:33:14 +0000 (+0000)
Subject: Synch to Gnus 200310011705.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e935883e6d91613c84577ba7154be15e19fcf4ee;p=elisp%2Fgnus.git-

Synch to Gnus 200310011705.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b82e76c..bfe4b8c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-10-01  Simon Josefsson  <jas@extundo.com>
+
+	* message.el (message-idna-to-ascii-rhs-1): RHS can be terminated
+	by ',', as in 'foo@example.org, bar@example.org'.
+
 2003-10-01  Jesper Harder  <harder@ifa.au.dk>
 
 	* message.el (message-send): Fix reversed logic of supersedes
diff --git a/lisp/message.el b/lisp/message.el
index 999c560..b5525b9 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -5380,7 +5380,7 @@ I.e., calling it on a Subject: header is useless."
   (let (rhs ace start startpos endpos ovl)
     (goto-char (point-min))
     (while (re-search-forward (concat "^" header) nil t)
-      (while (re-search-forward "@\\([^ \t\r\n>]+\\)"
+      (while (re-search-forward "@\\([^ \t\r\n>,]+\\)"
 				(or (save-excursion
 				      (re-search-forward "^[^ \t]" nil t))
 				    (point-max))