emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/inspector 82f2b5d894 2/4: use tree-inspector-indent-las


From: ELPA Syncer
Subject: [elpa] externals/inspector 82f2b5d894 2/4: use tree-inspector-indent-last-unit in tree-inspector--get-indent
Date: Sun, 8 Jan 2023 14:57:56 -0500 (EST)

branch: externals/inspector
commit 82f2b5d894094db1a1d48c1793a90c7541f107b4
Author: Martin Joerg <martin.joerg@gmail.com>
Commit: Martin Joerg <martin.joerg@gmail.com>

    use tree-inspector-indent-last-unit in tree-inspector--get-indent
---
 tree-inspector.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/tree-inspector.el b/tree-inspector.el
index f20433663e..fd0ae36b04 100644
--- a/tree-inspector.el
+++ b/tree-inspector.el
@@ -172,8 +172,11 @@ in a format understood by `kbd'.  Commands a names of Lisp 
functions."
   (let ((indent ())
         (parent nil))
     (while (setq parent (treeview-get-node-parent node))
-      (setq indent (cons tree-inspector-indent-unit indent)
-            node parent))
+      (push (if (treeview-last-child-p parent)
+                tree-inspector-indent-last-unit
+              tree-inspector-indent-unit)
+            indent)
+      (setq node parent))
     indent))
 
 (defun tree-inspector--new-node (object)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]