diff lisp/gnus/nnml.el @ 167:85ec50267440 r20-3b10

Import from CVS: tag r20-3b10
author cvs
date Mon, 13 Aug 2007 09:45:46 +0200
parents 25f70ba0133c
children
line wrap: on
line diff
--- a/lisp/gnus/nnml.el	Mon Aug 13 09:44:44 2007 +0200
+++ b/lisp/gnus/nnml.el	Mon Aug 13 09:45:46 2007 +0200
@@ -759,8 +759,7 @@
 	     (search-forward "\n\n" nil t)
 	     (setq chars (- (point-max) (point)))
 	     (max 1 (1- (point)))))
-	  (when (and (not (= 0 chars))	; none of them empty files...
-		     (not (= (point-min) (point-max))))
+	  (unless (zerop (buffer-size))
 	    (goto-char (point-min))
 	    (setq headers (nnml-parse-head chars (caar files)))
 	    (save-excursion