Function: cape-wrap-inside-faces

cape-wrap-inside-faces is a natively 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 /nix/store/nxaggkd0bn9kr2xfg9hyw77q51q20r8y-emacs-packages-deps/share/emacs/site-lisp/elpa/cape-20260927.2347/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)))