Re: bug/patch: gnus-start.el gnus-convert-old-newsrc

[Reiner Steib]

On Tue, Oct 26 2004, Karl Chen wrote:

> `gnus-convert-old-newsrc' has a bug.  This micropatch fixes it.
> This is from Emacs CVS HEAD.
[...]
>         (while (and converters (< fcv (caar converters))
> -                   (<= (caar converters) gnus-version))
> +                   (<= (caar converters) (gnus-continuum-version 
> gnus-version)))

This problem has already been fixed in the Gnus v5-10 branch, I think.
The fix will be available in Emacs CVS within a couple of days.

--8<---------------cut here---------------start------------->8---
--- gnus-start.el       21 Oct 2004 04:18:22 -0000      6.87.2.5
+++ gnus-start.el       24 Oct 2004 16:00:01 -0000      6.87.2.6
@@ -2225,7 +2225,8 @@
 (defun gnus-convert-old-newsrc ()
   "Convert old newsrc formats into the current format, if needed."
   (let ((fcv (and gnus-newsrc-file-version
-                 (gnus-continuum-version gnus-newsrc-file-version))))
+                 (gnus-continuum-version gnus-newsrc-file-version)))
+       (gcv (gnus-continuum-version)))
     (when fcv
       ;; A newsrc file was loaded.
       (let (prompt-displayed
@@ -2259,7 +2260,7 @@
         ;; Perform converters to bring older version up to date.
        (when (and converters (< fcv (caar converters)))
          (while (and converters (< fcv (caar converters))
-                     (<= (caar converters) gnus-version))
+                     (<= (caar converters) gcv))
             (let* ((converter-spec  (pop converters))
                    (convert-to      (nth 1 converter-spec))
                    (load-from       (nth 2 converter-spec))
--8<---------------cut here---------------end--------------->8---

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