GNU bug report logs - #12004
[PATCH] Filter out negative article numbers during expiry

Previous Next

Full log

View this message in rfc822 format

From: Dave Abrahams <dave <at> boostpro.com>
To: 12004 <at> debbugs.gnu.org
Subject: bug#12004: [PATCH] Filter out negative article numbers during expiry
Date: Fri, 20 Jul 2012 21:21:53 -0400

[0001-Filter-out-negative-article-numbers-during-expiry.patch (text/x-patch, inline)]

From a3bc651f68c7cb81779ae0bcae88ecf75abbc896 Mon Sep 17 00:00:00 2001
From: Dave Abrahams <dave <at> boostpro.com>
Date: Fri, 20 Jul 2012 21:08:53 -0400
Subject: [PATCH] Filter out negative article numbers during expiry

Fixes #11980

See http://debbugs.gnu.org/cgi/bugreport.cgi?bug=11980#8
---
 lisp/gnus-int.el |    4 ++++
 1 files changed, 4 insertions(+), 0 deletions(-)

diff --git a/lisp/gnus-int.el b/lisp/gnus-int.el
index 18e56ed..d4a52ed 100644
--- a/lisp/gnus-int.el
+++ b/lisp/gnus-int.el
@@ -722,6 +722,10 @@ If GROUP is nil, all groups on GNUS-COMMAND-METHOD are scanned."
 
 (defun gnus-request-expire-articles (articles group &optional force)
   (let* ((gnus-command-method (gnus-find-method-for-group group))
+         ;; Filter out any negative article numbers; they can't be
+         ;; expired here.
+         (articles
+          (delq nil (mapcar (lambda (n) (and (>= n 0) n)) articles)))
 	 (gnus-inhibit-demon t)
 	 (not-deleted
 	  (funcall
-- 
1.7.7.5 (Apple Git-26)

[Message part 2 (text/plain, inline)]

Ma Gnus v0.6
GNU Emacs 24.1.1 (x86_64-apple-darwin11.4.0, Carbon Version 1.6.0 AppKit 1138.47)
 of 2012-06-27 on pluto.luannocracy.com

-- 
Dave Abrahams
BoostPro Computing
http://www.boostpro.com

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.