Eglot: auto-expand first level in type and call hierarchies

* lisp/progmodes/eglot.el (eglot--hierarchy-2): Use widget-apply-action.
This commit is contained in:
João Távora 2025-02-08 13:42:08 +00:00
parent 3fde13a501
commit 37c07f383b

View file

@ -4564,7 +4564,8 @@ If NOERROR, return predicate, else erroring function."
(let ((inhibit-read-only t))
(erase-buffer)
(mapc (lambda (r)
(widget-create (convert r)))
(let ((w (widget-create (convert r))))
(widget-apply-action w)))
eglot--hierarchy-roots)
(goto-char (point-min))))
(pop-to-buffer (current-buffer)))