[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-start.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-start.el |
Date: |
Thu, 21 Oct 2004 19:15:56 -0400 |
Index: emacs/lisp/gnus/gnus-start.el
diff -c emacs/lisp/gnus/gnus-start.el:1.26 emacs/lisp/gnus/gnus-start.el:1.27
*** emacs/lisp/gnus/gnus-start.el:1.26 Tue Oct 19 22:38:27 2004
--- emacs/lisp/gnus/gnus-start.el Thu Oct 21 23:10:28 2004
***************
*** 2247,2255 ****
gnus-convert-old-ticks)
("Oort Gnus v0.08" "legacy-gnus-agent"
gnus-agent-convert-to-compressed-agentview)
! ("No Gnus v0.2" "legacy-gnus-agent"
gnus-agent-unlist-expire-days)
! ("No Gnus v0.2" "legacy-gnus-agent"
gnus-agent-unhook-expire-days)))
#'car-less-than-car)))
;; Skip converters older than the file version
--- 2247,2255 ----
gnus-convert-old-ticks)
("Oort Gnus v0.08" "legacy-gnus-agent"
gnus-agent-convert-to-compressed-agentview)
! ("Gnus v5.11" "legacy-gnus-agent"
gnus-agent-unlist-expire-days)
! ("Gnus v5.11" "legacy-gnus-agent"
gnus-agent-unhook-expire-days)))
#'car-less-than-car)))
;; Skip converters older than the file version
***************
*** 2258,2264 ****
;; Perform converters to bring older version up to date.
(when (and converters (< fcv (caar converters)))
! (while (and converters (< fcv (caar converters)))
(let* ((converter-spec (pop converters))
(convert-to (nth 1 converter-spec))
(load-from (nth 2 converter-spec))
--- 2258,2265 ----
;; 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))
(let* ((converter-spec (pop converters))
(convert-to (nth 1 converter-spec))
(load-from (nth 2 converter-spec))