From b3dc09d018606afc7341d363d415c54e1687bbdb Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 3 Sep 2001 22:21:00 +0000 Subject: [PATCH] Synch with Oort Gnus. --- lisp/ChangeLog | 5 +++++ lisp/nnmbox.el | 6 +++--- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fe15f39..5933326 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-09-02 Benjamin Rutt + + * nnmbox.el (nnmbox-find-article): Fix infinite loop when + searching for an article that isn't in the mbox. + 2001-09-02 23:12:48 Lars Magne Ingebrigtsen * nnslashdot.el (nnslashdot-retrieve-headers-1): Get references diff --git a/lisp/nnmbox.el b/lisp/nnmbox.el index f45b7f2..d20ae3d 100644 --- a/lisp/nnmbox.el +++ b/lisp/nnmbox.el @@ -519,9 +519,9 @@ This variable is a virtual server slot. See the Gnus manual for details.") (nnmbox-in-header-p (point))) (progn (goto-char (point-min)) - (while (not found) - (setq found (and (search-forward art-string nil t) - (nnmbox-in-header-p (point))))) + (while (and (not found) + (search-forward art-string nil t)) + (setq found (nnmbox-in-header-p (point)))) found))))) (defun nnmbox-record-active-article (group-art) -- 1.7.10.4