Function: winner-ring

winner-ring is a byte-compiled function defined in winner.el.gz.

Signature

(winner-ring FRAME)

Source Code

;; Defined in /usr/src/emacs/lisp/winner.el.gz
;; Find the right ring.  If it does not exist, create one.
(defsubst winner-ring (frame)
  (or (cdr (assq frame winner-ring-alist))
      (let ((ring (make-ring winner-ring-size)))
        (ring-insert ring (winner-configuration frame))
        (push (cons frame ring) winner-ring-alist)
        ring)))