diff lisp/gnus/nnvirtual.el @ 122:d2f30a177268 r20-1b14

Import from CVS: tag r20-1b14
author cvs
date Mon, 13 Aug 2007 09:26:03 +0200
parents fe104dbd9147
children
line wrap: on
line diff
--- a/lisp/gnus/nnvirtual.el	Mon Aug 13 09:25:31 2007 +0200
+++ b/lisp/gnus/nnvirtual.el	Mon Aug 13 09:26:03 2007 +0200
@@ -626,7 +626,7 @@
 	  (setq entry (assoc (car article) carticles))
 	  (setcdr entry (cons (cdr article) (cdr entry))))
 	(setq i (1+ i))))
-    (mapc '(lambda (x) (setcdr x (nreverse (cdr x))))
+    (mapc (lambda (x) (setcdr x (nreverse (cdr x))))
 	  carticles)
     carticles))