(nnheader-parse-nov): Pass the eol value to nnheader-nov-read-integer.

diff --git a/ChangeLog b/ChangeLog
index eaf8c81..db61e9e 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2004-06-21  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * lisp/nnheader.el (nnheader-parse-nov): Pass the eol value to
+       nnheader-nov-read-integer.
+
 2004-06-16  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * make.bat: Fix line endings around arch-tag.

diff --git a/lisp/nnheader.el b/lisp/nnheader.el
index 8a2aead..547d3b2 100644 (file)
--- a/lisp/nnheader.el
+++ b/lisp/nnheader.el
@@ -795,8 +795,8 @@ given, the return value will not contain the last newline."
        (nnheader-generate-fake-message-id ,number))))
 
 (defun nnheader-parse-nov ()
-  (let ((eol (point-at-eol))
-       (number (nnheader-nov-read-integer)))
+  (let* ((eol (point-at-eol))
+        (number (nnheader-nov-read-integer)))
     (make-full-mail-header
      number                            ; number
      (nnheader-nov-field)              ; subject