From 50ef36f521892a7a31f86f0f717ffa56398b5e87 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 20 Feb 1997 05:38:08 +0000 Subject: [PATCH] (nnheader-insert-head): Handle the case that the length of header is changed because of code conversion. --- lisp/nnheader.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/nnheader.el b/lisp/nnheader.el index 1c93816dfb6..a15e156eb1d 100644 --- a/lisp/nnheader.el +++ b/lisp/nnheader.el @@ -302,8 +302,8 @@ on your system, you could say something like: (let ((beg 0) format-alist (chop 1024)) - (while (and (eq chop (nth 1 (insert-file-contents - file nil beg (incf beg chop)))) + (while (and (not (zerop (nth 1 (insert-file-contents + file nil beg (incf beg chop))))) (prog1 (not (search-forward "\n\n" nil t)) (goto-char (point-max))) (or (null nnheader-max-head-length) -- 2.39.5