Function: filesets-ingroup-get-data

filesets-ingroup-get-data is a byte-compiled function defined in filesets.el.gz.

Signature

(filesets-ingroup-get-data MASTER POS &optional FUN)

Documentation

Access to filesets-ingroup-patterns. Extract data section.

Source Code

;; Defined in /usr/src/emacs/lisp/filesets.el.gz
(defun filesets-ingroup-get-data (master pos &optional fun)
  "Access to `filesets-ingroup-patterns'.  Extract data section."
  (let ((masterfile (file-name-nondirectory master))
	(fn (or fun (lambda (a b)
		      (and (stringp a)
			   (stringp b)
			   (string-match-p a b))))))
    (cl-some (lambda (x)
	       (if (funcall fn (car x) masterfile)
		   (nth pos x)
		 nil))
	     filesets-ingroup-patterns)))