Function: cider-macroexpand-menu--apply-args

cider-macroexpand-menu--apply-args is a byte-compiled function defined in cider-macroexpansion.el.

Signature

(cider-macroexpand-menu--apply-args ARGS COMMAND)

Documentation

Call macroexpand COMMAND with the cider-macroexpand-menu ARGS applied.

The display arguments are let-bound around the call, so the popup macroexpansion honors them for this invocation only.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20261106.1225/cider-macroexpansion.el
(defun cider-macroexpand-menu--apply-args (args command)
  "Call macroexpand COMMAND with the `cider-macroexpand-menu' ARGS applied.
The display arguments are `let'-bound around the call, so the popup
macroexpansion honors them for this invocation only."
  (let ((cider-macroexpansion-display-namespaces
         (if-let* ((ns (transient-arg-value "--ns=" args)))
             (intern ns)
           cider-macroexpansion-display-namespaces))
        (cider-macroexpansion-print-metadata
         (or (and (member "--meta" args) t)
             cider-macroexpansion-print-metadata)))
    (funcall command)))