Gnus development mailing list
 help / color / mirror / Atom feed
* Re: fix for legacy-gnus-agent.el
       [not found] <87eizy99oq.fsf@liv.ac.uk>
@ 2008-12-23 16:52 ` Reiner Steib
  0 siblings, 0 replies; only message in thread
From: Reiner Steib @ 2008-12-23 16:52 UTC (permalink / raw)
  To: Dave Love; +Cc: ding, bugs

On Tue, Dec 23 2008, Dave Love wrote:

> cadar is only defined by CL, which isn't loaded in a normal compilation.
>
> 2008-12-23  Dave Love  <fx@gnu.org>
>
> 	* legacy-gnus-agent.el (gnus-agent-unlist-expire-days): Don't use
> 	cadar.

Installed.  Thanks.

> Index: legacy-gnus-agent.el
> ===================================================================
> RCS file: /usr/local/cvsroot/gnus/lisp/legacy-gnus-agent.el,v
> retrieving revision 1.12
> diff -u -F^( -r1.12 legacy-gnus-agent.el
> --- legacy-gnus-agent.el	19 May 2008 08:47:42 -0000	1.12
> +++ legacy-gnus-agent.el	23 Dec 2008 15:42:35 -0000
> @@ -186,7 +186,7 @@ (defun gnus-agent-unlist-expire-days (co
>                                                                 (when (eq 0 (string-match
>                                                                              (caar days)
>                                                                              group))
> -                                                                 (throw 'found (cadar days)))
> +                                                                 (throw 'found (cadr (car days))))
>                                                                 (setq days (cdr days)))
>                                                               nil)))
>                                                   (when day

Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/



^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2008-12-23 16:52 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
     [not found] <87eizy99oq.fsf@liv.ac.uk>
2008-12-23 16:52 ` fix for legacy-gnus-agent.el Reiner Steib

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).