From 58191db43383778fd61d2fabb665b32162943321 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 22 Jun 2000 22:34:56 +0000 Subject: [PATCH] Sync with `t-gnus-6_14'. --- ChangeLog | 5 +++++ lisp/gnus-bbdb.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index be4d824..dd895af 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2000-06-13 Hirokazu FUKUI + + * lisp/gnus-bbdb.el(gnus-bbdb/update-record): Fix to fetch last + mail field. + 2000-06-09 Katsumi Yamaoka * 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)))) -- 1.7.10.4