Function: cider-cheatsheet--insert-hierarchy

cider-cheatsheet--insert-hierarchy is a byte-compiled function defined in cider-cheatsheet.el.

Signature

(cider-cheatsheet--insert-hierarchy HIERARCHY &optional (LEVEL 0))

Documentation

Insert HIERARCHY with visual indentation for LEVEL.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260414.1619/cider-cheatsheet.el
(cl-defun cider-cheatsheet--insert-hierarchy (hierarchy &optional (level 0))
  "Insert HIERARCHY with visual indentation for LEVEL."
  (dolist (node hierarchy)
    (if (stringp (car node))
        (progn
          (insert (make-string (* level 2) ?\s) (car node) "\n")
          (cider-cheatsheet--insert-hierarchy (cdr node) (1+ level)))
      (dolist (var (cider-cheatsheet--expand-vars node))
        (insert (make-string (* level 2) ?\s))
        (insert-text-button var
                            'var var
                            'action (lambda (btn)
                                      (funcall cider-cheatsheet-default-action-function
                                               (button-get btn 'var)))
                            'help-echo (format "Show documentation for %s" var))
        (insert "\n")))))