/[emacs]/emacs/lisp/gnus/gnus-start.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-start.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.20.2.5 by miles, Mon Oct 25 04:22:24 2004 UTC revision 1.20.2.6 by miles, Fri Oct 29 02:05:07 2004 UTC
# Line 2225  If FORCE is non-nil, the .newsrc file is Line 2225  If FORCE is non-nil, the .newsrc file is
2225  (defun gnus-convert-old-newsrc ()  (defun gnus-convert-old-newsrc ()
2226    "Convert old newsrc formats into the current format, if needed."    "Convert old newsrc formats into the current format, if needed."
2227    (let ((fcv (and gnus-newsrc-file-version    (let ((fcv (and gnus-newsrc-file-version
2228                    (gnus-continuum-version gnus-newsrc-file-version))))                    (gnus-continuum-version gnus-newsrc-file-version)))
2229            (gcv (gnus-continuum-version)))
2230      (when fcv      (when fcv
2231        ;; A newsrc file was loaded.        ;; A newsrc file was loaded.
2232        (let (prompt-displayed        (let (prompt-displayed
# Line 2259  If FORCE is non-nil, the .newsrc file is Line 2260  If FORCE is non-nil, the .newsrc file is
2260          ;; Perform converters to bring older version up to date.          ;; Perform converters to bring older version up to date.
2261          (when (and converters (< fcv (caar converters)))          (when (and converters (< fcv (caar converters)))
2262            (while (and converters (< fcv (caar converters))            (while (and converters (< fcv (caar converters))
2263                        (<= (caar converters) gnus-version))                        (<= (caar converters) gcv))
2264              (let* ((converter-spec  (pop converters))              (let* ((converter-spec  (pop converters))
2265                     (convert-to      (nth 1 converter-spec))                     (convert-to      (nth 1 converter-spec))
2266                     (load-from       (nth 2 converter-spec))                     (load-from       (nth 2 converter-spec))

Legend:
Removed from v.1.20.2.5  
changed lines
  Added in v.1.20.2.6

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26