Function: treemacs--next-neighbour-of--inliner

treemacs--next-neighbour-of--inliner is a function defined in treemacs-core-utils.el.

Signature

(treemacs--next-neighbour-of--inliner INLINE--FORM BTN)

Source Code

;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-core-utils.el
;; Could not find source code, showing raw function object.
#[(inline--form btn)
  ((ignore inline--form)
   (catch 'inline--just-use
     (let*
	 ((exp btn)
	  (btn (if (macroexp-copyable-p exp) exp (make-symbol "btn")))
	  (body
	   (list '-let
		 (list
		  (list 'depth (list 'treemacs-button-get btn :depth))
		  (list 'next
			(list 'next-button
			      (list 'treemacs-button-end btn))))
		 (list 'while
		       (list 'and 'next
			     (list '< 'depth
				   (list 'treemacs-button-get 'next
					 :depth)))
		       (list 'setq 'next
			     (list 'next-button
				   (list 'treemacs-button-end 'next))))
		 (list 'when
		       (list 'and 'next
			     (list '= 'depth
				   (list 'treemacs-button-get 'next
					 :depth)))
		       'next))))
       (if (eq btn exp) body
	 (macroexp-let* (list (list btn exp)) body)))))
  (t)]