From e3da950cc63d9e2d41246b84b7cb68f30c5156b0 Mon Sep 17 00:00:00 2001
From: yamaoka <yamaoka>
Date: Mon, 18 Mar 2002 01:11:40 +0000
Subject: [PATCH] Synch with Oort Gnus.

---
 lisp/ChangeLog    |    6 ++++++
 lisp/gnus-util.el |    2 +-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7453cf0..d6bf88f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2002-03-16  Simon Josefsson  <jas@extundo.com>
+
+	* gnus-util.el (gnus-extract-address-components): Don't break on
+	names such as James "Kibo" Parry.  From Francis Litterio
+	<franl_removethis@world.std.com>.
+
 2002-03-13  Simon Josefsson  <jas@extundo.com>
 
 	* pop3.el (pop3-open-server): Revert multibyte change.  From
diff --git a/lisp/gnus-util.el b/lisp/gnus-util.el
index 45f6743..fd4a0bd 100644
--- a/lisp/gnus-util.el
+++ b/lisp/gnus-util.el
@@ -198,7 +198,7 @@
 	 (string-match (concat "[ \t]*<" (regexp-quote address) ">") from)
 	 (and (setq name (substring from 0 (match-beginning 0)))
 	      ;; Strip any quotes from the name.
-	      (string-match "\".*\"" name)
+	      (string-match "^\".*\"$" name)
 	      (setq name (substring name 1 (1- (match-end 0))))))
     ;; If not, then "address (name)" is used.
     (or name
-- 
1.7.10.4