Function: cider-xref-tree--browse

cider-xref-tree--browse is a byte-compiled function defined in cider-xref-tree.el.

Signature

(cider-xref-tree--browse SYMBOL OP BUFFER-NAME TITLE-FMT NOUN)

Documentation

Open a call-graph tree rooted at SYMBOL, expanding via OP.

BUFFER-NAME and TITLE-FMT name and describe the buffer; NOUN names the search for the prompt. Resolves SYMBOL up front, signalling a typo/unloaded-namespace hint when it can't be. OP's availability is enforced by the sender when sent.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260822.1520/cider-xref-tree.el
(defun cider-xref-tree--browse (symbol op buffer-name title-fmt noun)
  "Open a call-graph tree rooted at SYMBOL, expanding via OP.
BUFFER-NAME and TITLE-FMT name and describe the buffer; NOUN names the search
for the prompt.  Resolves SYMBOL up front, signalling a typo/unloaded-namespace
hint when it can't be.  OP's availability is enforced by the sender when sent."
  (cider-ensure-session)
  (let* ((symbol (or symbol (cider-symbol-at-point)
                     (read-string (format "%s: " noun))))
         (info (or (cider-var-info symbol)
                   (user-error "%s" (cider-resolution-failure-message symbol))))
         (var (concat (nrepl-dict-get info "ns") "/" (nrepl-dict-get info "name")))
         ;; capture the source buffer's namespace now - by the time a node is
         ;; expanded the current buffer is the popup, not the source.
         (ns (cider-current-ns))
         (root (cider-xref-tree--node var op ns nil)))
    (with-current-buffer (cider-popup-buffer buffer-name 'select
                                             'cider-tree-view-mode 'ancillary)
      (cider-tree-view-render (list root) (format title-fmt var)))))