Function: treemacs--on-collapse-of-node-without-children--inliner

treemacs--on-collapse-of-node-without-children--inliner is a function defined in treemacs-dom.el.

Signature

(treemacs--on-collapse-of-node-without-children--inliner INLINE--FORM DOM-NODE)

Source Code

;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-dom.el
;; Could not find source code, showing raw function object.
#[(inline--form dom-node)
  ((ignore inline--form)
   (catch 'inline--just-use
     (let*
	 ((exp dom-node)
	  (dom-node
	   (if (macroexp-copyable-p exp) exp (make-symbol "dom-node")))
	  (body
	   (list 'let
		 (list
		  (list 'parent-dom-node
			(list 'treemacs-dom-node->parent dom-node)))
		 (list 'when 'parent-dom-node
		       (list 'setf
			     (list 'treemacs-dom-node->reentry-nodes
				   'parent-dom-node)
			     (list 'delete dom-node
				   (list
				    'treemacs-dom-node->reentry-nodes
				    'parent-dom-node)))))))
       (if (eq dom-node exp) body
	 (macroexp-let* (list (list dom-node exp)) body)))))
  (t)]