Function: nnselect-uncompress-artlist

nnselect-uncompress-artlist is a byte-compiled function defined in nnselect.el.gz.

Signature

(nnselect-uncompress-artlist ARTLIST)

Documentation

Uncompress ARTLIST.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/nnselect.el.gz
(defun nnselect-uncompress-artlist (artlist)
  "Uncompress ARTLIST."
  (if (vectorp artlist)
      artlist
    (let (selection)
      (pcase-dolist (`(,artgroup . ,list) artlist)
        (pcase-dolist (`(,artrsv . ,artseq) list)
          (setq selection
                (vconcat selection
                         (cl-map 'vector
                                 (lambda (art)
                                   (vector artgroup art artrsv))
                                 (gnus-uncompress-sequence artseq))))))
      (sort selection
            (lambda (x y)
              (< (nnselect-artitem-rsv x) (nnselect-artitem-rsv y)))))))