--- ChangeLog~	Thu Aug  9 20:07:45 2001
+++ ChangeLog	Sat Aug 11 09:41:07 2001
@@ -1,3 +1,8 @@
+2001-08-11 09:40:00  Karl Kleinpaste  <karl@charcoal.com>
+
+	* gnus-score.el (gnus-score-string): Fix `match' regexp
+	for `extra' header case.
+	
 2001-08-09 15:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
 	* nndraft.el (nndraft-request-group): Use
--- gnus-score.el.~1~	Tue Jul 24 21:55:17 2001
+++ gnus-score.el	Sat Aug 11 09:36:55 2001
@@ -1952,7 +1952,7 @@
 	  ;; Evil hackery to make match usable in non-standard headers.
 	  (when extra
 	    (setq match (concat "[ (](" extra " \\. \"[^)]*"
-				match "[^(]*\")[ )]")
+				match "[^\"]*\")[ )]")
 		  search-func 're-search-forward)) ; XXX danger?!?
 
 	  (cond