From: yamaoka <yamaoka>
Date: Thu, 22 Jun 2000 22:34:56 +0000 (+0000)
Subject: Sync
X-Git-Tag: t-gnus-6_14-quimby-before-AC-changed-~20
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=58191db43383778fd61d2fabb665b32162943321;p=elisp%2Fgnus.git-

Sync
with `t-gnus-6_14'.
---

diff --git a/ChangeLog b/ChangeLog
index be4d824..dd895af 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2000-06-13  Hirokazu FUKUI  <hfukui@sannet.ne.jp>
+
+	* lisp/gnus-bbdb.el(gnus-bbdb/update-record): Fix to fetch last
+	mail field.
+
 2000-06-09  Katsumi Yamaoka <yamaoka@jpl.org>
 
 	* lisp/gnus.el (gnus-news-group-p): Sync with Gnus.
diff --git a/lisp/gnus-bbdb.el b/lisp/gnus-bbdb.el
index 119e3bf..45cca0a 100644
--- a/lisp/gnus-bbdb.el
+++ b/lisp/gnus-bbdb.el
@@ -63,7 +63,7 @@ the user confirms the creation."
 			    (progn (goto-char (point-min))
 				   (or (search-forward "\n\n" nil t)
 				       (error "message unexists"))
-				   (- (point) 2)))
+				   (1- (point))))
 	  (when (setq from (mail-fetch-field "from"))
 	    (setq from (gnus-bbdb/extract-address-components
 			(gnus-bbdb/decode-field-body from 'From))))