Function: treemacs-scope-shelf->kill-buffer--inliner
treemacs-scope-shelf->kill-buffer--inliner is a function defined in
treemacs-scope.el.
Signature
(treemacs-scope-shelf->kill-buffer--inliner INLINE--FORM SELF)
Source Code
;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-scope.el
;; Could not find source code, showing raw function object.
#[(inline--form self)
((ignore inline--form)
(catch 'inline--just-use
(let*
((exp self)
(self
(if (macroexp-copyable-p exp) exp (make-symbol "self")))
(body
(list 'progn
(list 'let
(list
(list 'buffer
(list 'treemacs-scope-shelf->buffer self)))
(list 'when (list 'buffer-live-p 'buffer)
(list 'kill-buffer 'buffer)))
(list 'setf (list 'treemacs-scope-shelf->buffer self)
nil))))
(if (eq self exp) body
(macroexp-let* (list (list self exp)) body)))))
(t)]