Mercurial > emacs
diff lisp/gnus/gnus-start.el @ 57723:6a65cb24e1be
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-640
Merge from gnus--rel--5.10
Patches applied:
* miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-59
- miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-60
Update from CVS
2004-10-25 Reiner Steib <Reiner.Steib@gmx.de>
* lisp/gnus/html2text.el (html2text-buffer-head): Removed. Use `goto-char'
instead.
2004-10-24 Kevin Greiner <kevin.greiner@compsol.cc>
* lisp/gnus/gnus-start.el (gnus-convert-old-newsrc): Fixed numeric
comparison on string.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Tue, 26 Oct 2004 22:33:43 +0000 |
parents | c660fc46d193 |
children | df80d19d7a2e 0fe073a08cef |
line wrap: on
line diff
--- a/lisp/gnus/gnus-start.el Tue Oct 26 21:53:34 2004 +0000 +++ b/lisp/gnus/gnus-start.el Tue Oct 26 22:33:43 2004 +0000 @@ -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))