[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: problem with gnus nnimap
From: |
Andreas Ames |
Subject: |
Re: problem with gnus nnimap |
Date: |
30 Oct 2001 11:57:28 +0100 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.1 |
Simon Josefsson <jas@extundo.com> writes:
> This should solve the problem. Maybe someone could commit this to
> CVS? At least two people has reported this now.
>
> 2001-07-01 Simon Josefsson <jas@extundo.com>
>
> * nnimap.el (nnimap-date-days-ago): Defeat locale.
>
> --- nnimap.el.~1.4.~ Sun Jul 15 19:42:53 2001
> +++ nnimap.el Mon Oct 29 21:10:57 2001
> @@ -1088,10 +1088,12 @@
>
> (defun nnimap-date-days-ago (daysago)
> "Return date, in format \"3-Aug-1998\", for DAYSAGO days ago."
> - (let ((date (format-time-string "%d-%b-%Y"
> - (nnimap-time-substract
> - (current-time)
> - (days-to-time daysago)))))
> + (let* ((time (nnimap-time-substract (current-time) (days-to-time daysago)))
> + (date (format-time-string
> + (format "%%d-%s-%%Y"
> + (capitalize (car (rassoc (nth 4 (decode-time time))
> + parse-time-months))))
> + time)))
> (if (eq ?0 (string-to-char date))
> (substring date 1)
> date)))
Your patch solves my problem. Thanks.
andreas