From ed5de9f407571be42a51839eca9d6e4a42b6cd5e Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jo=C3=A3o=20T=C3=A1vora?= Date: Sat, 8 Feb 2025 13:42:08 +0000 Subject: [PATCH] Eglot: auto-expand first level in type and call hierarchies * lisp/progmodes/eglot.el (eglot--hierarchy-2): Use widget-apply-action. (cherry picked from commit 37c07f383b053a40b31439076bec0b170c1281de) --- lisp/progmodes/eglot.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index 995d47a1306..f01b41f1c56 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el @@ -4637,7 +4637,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))) -- 2.39.5