summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/nnheader.el4
1 files 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)