Mercurial > hg > xemacs-beta

diff lisp/gnus/nnml.el @ 28:1917ad0d78d7 r19-15b97

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b97
author cvs
date Mon, 13 Aug 2007 08:51:55 +0200
parents 441bb1e64a06
children ec9a17fef872
line wrap: on
line diff
--- a/lisp/gnus/nnml.el	Mon Aug 13 08:51:34 2007 +0200
+++ b/lisp/gnus/nnml.el	Mon Aug 13 08:51:55 2007 +0200
@@ -106,7 +106,8 @@
 	    (while sequence
 	      (setq article (car sequence))
 	      (setq file (nnml-article-to-file article))
-	      (when (and (file-exists-p file)
+	      (when (and file
+			 (file-exists-p file)
 			 (not (file-directory-p file)))
 		(insert (format "221 %d Article retrieved.\n" article))
 		(setq beg (point))