From: yamaoka <yamaoka>
Date: Mon, 21 Jun 2004 23:09:43 +0000 (+0000)
Subject: (nnheader-parse-nov): Pass the eol value to nnheader-nov-read-integer.
X-Git-Tag: t-gnus-6_17_4-quimby-~851
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=849ff8410fdd5a187cdd19276e13c06c3757d0fd;p=elisp%2Fgnus.git-

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

diff --git a/ChangeLog b/ChangeLog
index eaf8c81..db61e9e 100644
--- 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
--- 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