[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/inspector be1901fcaf 1/4: tree-inspector: expand the ro
From: |
ELPA Syncer |
Subject: |
[elpa] externals/inspector be1901fcaf 1/4: tree-inspector: expand the root node |
Date: |
Fri, 16 Sep 2022 17:57:48 -0400 (EDT) |
branch: externals/inspector
commit be1901fcaf72a72a9cb8d2708af7a469f5620eec
Author: Mariano Montone <marianomontone@gmail.com>
Commit: Mariano Montone <marianomontone@gmail.com>
tree-inspector: expand the root node
---
tree-inspector.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/tree-inspector.el b/tree-inspector.el
index 2573b2fcd7..a4b611eb47 100644
--- a/tree-inspector.el
+++ b/tree-inspector.el
@@ -500,7 +500,9 @@ DATA can be any Emacs Lisp object."
(setq-local treeview-get-label-keymap-function
(cl-constantly
(treeview-make-keymap tree-inspector-label-keymap)))
- (treeview-display-node (tree-inspector--make-node data))
+ (let ((node (tree-inspector--make-node data)))
+ (treeview-expand-node node)
+ (treeview-display-node node))
(setq buffer-read-only t)
(local-set-key (kbd "q") #'kill-current-buffer)
(switch-to-buffer buffer)