From: morioka <morioka>
Date: Thu, 16 Nov 1995 11:11:56 +0000 (+0000)
Subject: ���� rfc822/parse-group �� comma �� let ��������������������������
X-Git-Tag: XEmacs-20_3-b27-viet~137
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=045637cf81257d8169ceec39bdceca561f4bafb1;p=elisp%2Fmu-cite.git

���� rfc822/parse-group �� comma �� let ��������������������������
---

diff --git a/tl-822.el b/tl-822.el
index d830532..fdae714 100644
--- a/tl-822.el
+++ b/tl-822.el
@@ -15,7 +15,7 @@
 
 
 (defconst rfc822/RCS-ID
-  "$Id: tl-822.el,v 6.0 1995-11-15 15:55:20 morioka Exp $")
+  "$Id: tl-822.el,v 7.0 1995-11-16 11:11:56 morioka Exp $")
 (defconst rfc822/version (get-version-string rfc822/RCS-ID))
 
 
@@ -522,7 +522,7 @@
 
 (defun rfc822/parse-group (lal)
   (let ((ret (rfc822/parse-phrase lal))
-	phrase colon mbox semicolon)
+	phrase colon comma mbox semicolon)
     (if (and ret
 	     (setq phrase (cdr (car ret)))
 	     (setq lal (cdr ret))