Re: problem with gnus nnimap

[Andreas Ames]

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