Function: fileloop-initialize-search

fileloop-initialize-search is an autoloaded and byte-compiled function defined in fileloop.el.gz.

Signature

(fileloop-initialize-search REGEXP FILES CASE-FOLD)

Source Code

;; Defined in /usr/src/emacs/lisp/fileloop.el.gz
;;;###autoload
(defun fileloop-initialize-search (regexp files case-fold)
  (let ((last-buffer (current-buffer)))
    (fileloop-initialize
     files
     (lambda ()
       (let ((case-fold-search (fileloop--case-fold regexp case-fold)))
         (re-search-forward regexp nil t)))
     (lambda ()
       (unless (eq last-buffer (current-buffer))
         (setq last-buffer (current-buffer))
         (message "Scanning file %s...found" buffer-file-name))
       nil))))