Function: cider-stacktrace-render-filters

cider-stacktrace-render-filters is a byte-compiled function defined in cider-stacktrace.el.

Signature

(cider-stacktrace-render-filters BUFFER SPECIAL-FILTERS FILTERS)

Documentation

Emit into BUFFER toggle buttons for each of the FILTERS.

SPECIAL-FILTERS are filters that show stack certain stack frames, hiding others.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260822.1520/cider-stacktrace.el
(defun cider-stacktrace-render-filters (buffer special-filters filters)
  "Emit into BUFFER toggle buttons for each of the FILTERS.
SPECIAL-FILTERS are filters that show stack certain stack frames, hiding
others."
  (with-current-buffer buffer
    (cl-flet ((insert-filter-buttons (filters)
                (dolist (filter filters)
                  (insert-text-button (car filter)
                                      'filter (cadr filter)
                                      'follow-link t
                                      'action #'cider-stacktrace-filter
                                      'help-echo (cider-stacktrace-tooltip
                                                  (format "Toggle %s stack frames"
                                                          (car filter))))
                  (insert " "))))
      (insert "  Show: ")
      (insert-filter-buttons special-filters)
      (insert "\n")
      (insert "  Hide: ")
      (insert-filter-buttons filters))

    (let ((hidden (copy-sequence "(0 frames hidden)")))
      (put-text-property 0 (length hidden) 'hidden-count t hidden)
      (insert " " hidden "\n"))))