Function: gnus-convert-old-ticks

gnus-convert-old-ticks is a byte-compiled function defined in gnus-start.el.gz.

Signature

(gnus-convert-old-ticks CONVERTING-TO)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-start.el.gz
(defun gnus-convert-old-ticks (_converting-to)
  (let ((newsrc (cdr gnus-newsrc-alist))
	marks info dormant ticked)
    (while (setq info (pop newsrc))
      (when (setq marks (gnus-info-marks info))
	(setq dormant (cdr (assq 'dormant marks))
	      ticked (cdr (assq 'tick marks)))
	(when (or dormant ticked)
	  (setf (gnus-info-read info)
                (gnus-add-to-range
                 (gnus-info-read info)
                 (nconc (gnus-uncompress-range dormant)
                        (gnus-uncompress-range ticked)))))))))