lkn
/
ollie
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

ellie tree: fix inactive agent rendering bug, default Active expanded

This commit is contained in:
Ollie Agent 2026-08-04 20:30:13 +02:00
parent 1b8f7eadb3
commit 6a3336038d
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
contrib/elisp/ellie.el
View File

@ -376,7 +376,7 @@ Prompts for agent profile and other options."
m)
"Keymap for `ellie-tree-mode'.")
(defvar-local ellie--tree-expanded nil
(defvar-local ellie--tree-expanded '("active")
"Set of expanded session IDs and header keys.")
(defvar-local ellie--tree-data nil
"Current tree data for rendering.")
@ -411,12 +411,12 @@ Prompts for agent profile and other options."
(push (list 'session id name
(if agents (format "%s (%d)" name (length agents)) name))
result)
(when (and agents (member id ellie--tree-expanded)
(dolist (a agents)
(let ((aname (car a)) (aid (nth 1 a)) (state (nth 2 a)))
(push (list 'agent id aid
(format " %s [%s]" aname state))
result)))))))))
(when (and agents (member id ellie--tree-expanded))
(dolist (a agents)
(let ((aname (car a)) (aid (nth 1 a)) (state (nth 2 a)))
(push (list 'agent id aid
(format " %s [%s]" aname state))
result))))))))
(setq ellie--tree-data (nreverse result))))
(defun ellie--tree-render ()