Function: cape-wrap-inside-faces

cape-wrap-inside-faces is an autoloaded and byte-compiled function defined in cape.el.

Signature

(cape-wrap-inside-faces CAPF &rest FACES)

Documentation

Call CAPF only if inside FACES.

Source Code

;; Defined in ~/.emacs.d/elpa/cape-20260804.2303/cape.el
;;;###autoload
(defun cape-wrap-inside-faces (capf &rest faces)
  "Call CAPF only if inside FACES."
  (when-let* (((> (point) (point-min)))
              (fs (get-text-property (1- (point)) 'face))
              ((if (listp fs)
                   (cl-loop for f in fs thereis (memq f faces))
                 (memq fs faces))))
    (funcall capf)))