Function: treemacs--is-event-relevant?--inliner

treemacs--is-event-relevant?--inliner is a function defined in treemacs-filewatch-mode.el.

Signature

(treemacs--is-event-relevant?--inliner INLINE--FORM EVENT)

Source Code

;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-filewatch-mode.el
;; Could not find source code, showing raw function object.
#[(inline--form event)
  ((ignore inline--form)
   (catch 'inline--just-use
     (let*
	 ((exp event)
	  (event
	   (if (macroexp-copyable-p exp) exp (make-symbol "event")))
	  (body
	   (list 'when
		 (list 'with-no-warnings 'treemacs-filewatch-mode)
		 (list 'let (list (list 'action (list 'cadr event)))
		       (list 'not
			     (list 'or
				   (list 'eq 'action
					 (list 'quote 'stopped))
				   (list 'and
					 (list 'eq 'action
					       (list 'quote 'changed))
					 (list 'not 'treemacs-git-mode))
				   (list 'and
					 'treemacs-hide-gitignored-files-mode
					 (list 'let*
					       (list
						(list 'file
						      (list 'caddr
							    event))
						(list 'parent
						      (list
						       'treemacs--parent-dir
						       'file))
						(list 'cache
						      (list 'ht-get
							    'treemacs--git-cache
							    'parent)))
					       (list 'and 'cache
						     (list 'eq
							   (list
							    'quote
							    'treemacs-git-ignored-face)
							   (list
							    'ht-get
							    'cache
							    'file)))))
				   (list 'let*
					 (list
					  (list 'dir
						(list 'caddr event))
					  (list 'filename
						(list
						 'treemacs--filename
						 'dir)))
					 (list '--any?
					       (list 'funcall 'it
						     'filename 'dir)
					       'treemacs-ignored-file-predicates))))))))
       (if (eq event exp) body
	 (macroexp-let* (list (list event exp)) body)))))
  (t)]