From f9fdb9daba629cd5b115d73e0aa60b1d059e4254 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 18 Oct 2000 10:13:32 +0000 Subject: [PATCH] Synch with Gnus. --- lisp/ChangeLog | 6 ++++++ lisp/gnus-sum.el | 3 ++- lisp/nnheader.el | 3 ++- 3 files changed, 10 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8ca328b..d86b4a6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2000-10-18 Simon Josefsson + + * nnheader.el (nnheader-parse-head): Try both "from:" and "from: ". + + * gnus-sum.el (gnus-get-newsgroup-headers): Ditto. + 2000-10-17 Simon Josefsson * gnus-sum.el (gnus-get-newsgroup-headers): Search for "from:" diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index ef48ff9..7f7a3ee 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -4777,7 +4777,8 @@ The resulting hash table is returned, or nil if no Xrefs were found." ;; From. (progn (goto-char p) - (if (search-forward "\nfrom:" nil t) + (if (or (search-forward "\nfrom: " nil t) + (search-forward "\nfrom:" nil t)) (nnheader-header-value) "(nobody)")) ;; Date. diff --git a/lisp/nnheader.el b/lisp/nnheader.el index 0396036..777369e 100644 --- a/lisp/nnheader.el +++ b/lisp/nnheader.el @@ -231,7 +231,8 @@ This variable is a substitute for `mm-text-coding-system-for-write'.") ;; From. (progn (goto-char p) - (if (search-forward "\nfrom:" nil t) + (if (or (search-forward "\nfrom: " nil t) + (search-forward "\nfrom:" nil t)) (nnheader-header-value) "(nobody)")) ;; Date. (progn -- 1.7.10.4