;;; Attention belongs to the live session.

(in-package #:lime.x11)

(defun visit-next-request (backend)
  (let ((requests
          (backend-attention-client-ids backend)))
    (when requests
      (backend-attend-client backend
                             (first requests)))))

;; Quiet until something needs you.