Function: cider--fringe-overlay-mark-stale

cider--fringe-overlay-mark-stale is a byte-compiled function defined in cider-overlays.el.

Signature

(cider--fringe-overlay-mark-stale OV AFTER-P BEG END &optional LEN)

Documentation

Recolor fringe indicator overlay OV to the stale face once its form is edited.

Installed on OV's modification-hooks: it acts only after the change (when AFTER-P is non-nil), then stops reacting, since the form stays stale until it is re-evaluated.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260822.1520/cider-overlays.el
(defun cider--fringe-overlay-mark-stale (ov after-p _beg _end &optional _len)
  "Recolor fringe indicator overlay OV to the stale face once its form is edited.
Installed on OV's `modification-hooks': it acts only after the change (when
AFTER-P is non-nil), then stops reacting, since the form stays stale until it
is re-evaluated."
  (when after-p
    (overlay-put ov 'before-string cider--fringe-overlay-stale)
    (overlay-put ov 'modification-hooks nil)))