Function: eca-chat--update-parent-subagent-status
eca-chat--update-parent-subagent-status is a natively compiled
function defined in eca-chat.el.
Signature
(eca-chat--update-parent-subagent-status PARENT-TOOL-CALL-ID NEW-STATUS)
Documentation
Update to NEW-STATUS symbol of a parent subagent tool call PARENT-TOOL-CALL-ID.
Only updates the label line, preserving all nested child content.
Source Code
;; Defined in /nix/store/jklqzw6pzz6j4jrbv8wy0iwgi7jlrbld-emacs-packages-deps/share/emacs/site-lisp/elpa/eca-20260928.1827/eca-chat.el
(defun eca-chat--update-parent-subagent-status (parent-tool-call-id new-status)
"Update to NEW-STATUS symbol of a parent subagent tool call PARENT-TOOL-CALL-ID.
Only updates the label line, preserving all nested child content."
(when-let* ((ov-label (eca-chat--get-expandable-content parent-tool-call-id))
(label (overlay-get ov-label 'eca-chat--tool-call-label))
(time (or (overlay-get ov-label 'eca-chat--tool-call-time) ""))
(ov-content (overlay-get ov-label 'eca-chat--expandable-content-ov-content)))
(overlay-put ov-label 'eca-chat--tool-call-status new-status)
(let* ((steps-info (or (overlay-get ov-label 'eca-chat--tool-call-steps-info) ""))
(new-label (concat (propertize label 'font-lock-face 'eca-chat-subagent-tool-call-label-face)
steps-info " " new-status time))
(open? (overlay-get ov-label 'eca-chat--expandable-content-toggle))
(content (overlay-get ov-content 'eca-chat--expandable-content-content))
(has-content? (and content (not (string-empty-p content)))))
(save-excursion
(goto-char (overlay-start ov-label))
(delete-region (point) (1- (overlay-start ov-content)))
(eca-chat--insert
(propertize (eca-chat--propertize-only-first-word
new-label
'line-prefix (when has-content?
(if open?
(overlay-get ov-label 'eca-chat--expandable-content-close-icon)
(overlay-get ov-label 'eca-chat--expandable-content-open-icon))))
'help-echo "mouse-1 / RET / tab: expand/collapse"))))))