Function: consult--customize-put

consult--customize-put is a natively compiled function defined in consult.el.

Signature

(consult--customize-put CMDS PROP FORM)

Documentation

Set property PROP to FORM of commands CMDS.

Source Code

;; Defined in /nix/store/6higv2v1wk916v4ynnybyrdkfy2gq44d-emacs-packages-deps/share/emacs/site-lisp/elpa/consult-20261004.957/consult.el
;;;; Customization macro

(defun consult--customize-put (cmds prop form)
  "Set property PROP to FORM of commands CMDS."
  (dolist (cmd cmds)
    (cond
     ((and (boundp cmd) (consp (symbol-value cmd)))
      (setf (plist-get (symbol-value cmd) prop) (eval form 'lexical)))
     ((functionp cmd)
      (setf (plist-get (alist-get cmd consult--customize-alist) prop) form))
     (t (warn "consult-customize: %s is neither a command nor a source" cmd))))
  nil)