Function: erc--querypoll-get-next

erc--querypoll-get-next is a byte-compiled function defined in erc-notify.el.gz.

Signature

(erc--querypoll-get-next RING)

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-notify.el.gz
(defun erc--querypoll-get-next (ring)
  (let ((n (ring-length ring)))
    (catch 'found
      (while (natnump (cl-decf n))
        (when-let* ((buffer (ring-remove ring))
                    ((buffer-live-p buffer)))
          ;; Push back buffers for users joined to some chan.
          (if (erc--querypoll-target-in-chan-p buffer)
              (ring-insert ring buffer)
            (throw 'found buffer)))))))