Re: bug in recent version of nnml.el

[Katsumi Yamaoka <yamaoka@jpl.org>]

>>>>> Katsumi Yamaoka wrote:
>>>>>> Katsumi Yamaoka wrote:
>> 2008-10-02  Katsumi Yamaoka  <yamaoka@jpl.org>

>>         * nnml.el (nnml-request-expire-articles): Expand nnmail-expiry-target
>>         to an actual expiry target first if it is a function.  Suggested by
>>         Phillip Lord <phillip.lord@newcastle.ac.uk>.

>>         * nnfolder.el (nnfolder-request-expire-articles): Ditto.

> I've reverted those changes.  Sorry.  I realized it causes another
> error if `nnmail-expiry-target' is the symbol `delete' that is
> the default.  It is not only a symbol but also a function symbol.
> I'll look for another solution...

Fixed in the Gnus CVS trunk.  The change I made in nnml.el is as
follows.  Note that the function set to `nnmail-expiry-target'
should be executed in a buffer in which there is an article to
be examined by the function (your function might not care article
contents, though).

--8<---------------cut here---------------start------------->8---
--- nnml.el~	2008-06-11 21:40:59 +0000
+++ nnml.el	2008-10-03 01:26:37 +0000
@@ -364,11 +364,11 @@
 		      nnml-article-file-alist)
 		  (when (functionp target)
 		    (setq target (funcall target group)))
-		  (if (and target
-			   (or (gnus-request-group target)
-			       (gnus-request-create-group target)))
-		      (nnmail-expiry-target-group target group)
-		    (setq target nil))))
+		  (when (and target (not (eq target 'delete)))
+		    (if (or (gnus-request-group target)
+			    (gnus-request-create-group target))
+			(nnmail-expiry-target-group target group)
+		      (setq target nil)))))
 	      ;; Maybe directory is changed during nnmail-expiry-target-group.
 	      (nnml-possibly-change-directory group server))
 	    (if target
--8<---------------cut here---------------end--------------->8---

Regards,