Function: fileloop--case-fold

fileloop--case-fold is a byte-compiled function defined in fileloop.el.gz.

Signature

(fileloop--case-fold REGEXP CASE-FOLD)

Source Code

;; Defined in /usr/src/emacs/lisp/fileloop.el.gz
(defun fileloop--case-fold (regexp case-fold)
  (let ((value
         (if (memql case-fold '(nil t))
             case-fold
           case-fold-search)))
    (if (and value search-upper-case)
        (isearch-no-upper-case-p regexp t)
      value)))