Function: treemacs--find-project-for-buffer--inliner

treemacs--find-project-for-buffer--inliner is a function defined in treemacs-workspaces.el.

Signature

(treemacs--find-project-for-buffer--inliner INLINE--FORM &optional BUFFER-FILE)

Source Code

;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-workspaces.el
;; Could not find source code, showing raw function object.
#[(inline--form &optional buffer-file)
  ((ignore inline--form)
   (catch 'inline--just-use
     (let*
	 ((exp buffer-file)
	  (buffer-file
	   (if (macroexp-copyable-p exp) exp
	     (make-symbol "buffer-file")))
	  (body
	   (list 'progn
		 (list 'unless 'treemacs--project-of-buffer
		       (list 'let
			     (list
			      (list 'path
				    (list 'or buffer-file
					  (list 'buffer-file-name))))
			     (list 'when 'path
				   (list 'setf
					 'treemacs--project-of-buffer
					 (list 'treemacs-is-path 'path
					       :in-workspace)))))
		 'treemacs--project-of-buffer)))
       (if (eq buffer-file exp) body
	 (macroexp-let* (list (list buffer-file exp)) body)))))
  (t)]