From 0a78e6143d9fd71637ccfe1840ab02c6102d7b65 Mon Sep 17 00:00:00 2001 From: Reiner Steib Date: Sun, 14 Nov 2004 21:00:13 +0000 Subject: [PATCH] (gnus-convert-old-newsrc): Assign legacy-gnus-agent to 5.10.7. --- lisp/ChangeLog | 5 +++++ lisp/gnus-start.el | 7 +++---- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1ad0e5d15..3b12ca558 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-11-14 Reiner Steib + + * gnus-start.el (gnus-convert-old-newsrc): Assign + legacy-gnus-agent to 5.10.7. + 2004-11-14 Lars Magne Ingebrigtsen * gnus-art.el (article-unsplit-urls): Don't anchor urls to the diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index 7506a6f32..7edace251 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -2262,13 +2262,13 @@ If FORCE is non-nil, the .newsrc file is read." ;; doesn't change with each release) and the ;; function that must be applied to convert the ;; previous version into the current version. - '(("September Gnus v0.1" nil + '(("September Gnus v0.1" nil 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 v5.10.7" "legacy-gnus-agent" gnus-agent-unlist-expire-days) - ("No Gnus v0.2" "legacy-gnus-agent" + ("Gnus v5.10.7" "legacy-gnus-agent" gnus-agent-unhook-expire-days))) #'car-less-than-car))) ;; Skip converters older than the file version @@ -2285,7 +2285,6 @@ If FORCE is non-nil, the .newsrc file is read." (when (and load-from (not (fboundp func))) (load load-from t)) - (or prompt-displayed (not (gnus-convert-converter-needs-prompt func)) (while (let (c -- 2.25.1