Function: read-regexp-case-fold-search

read-regexp-case-fold-search is a byte-compiled function defined in replace.el.gz.

Signature

(read-regexp-case-fold-search REGEXP)

Documentation

Return a value for case-fold-search based on REGEXP and current settings.

REGEXP is a string as returned by read-regexp.

View in manual

Source Code

;; Defined in /usr/src/emacs/lisp/replace.el.gz
(defun read-regexp-case-fold-search (regexp)
  "Return a value for `case-fold-search' based on REGEXP and current settings.
REGEXP is a string as returned by `read-regexp'."
  (let ((fold (get-text-property 0 'case-fold regexp)))
    (cond
     ((eq fold 'fold) t)
     ((eq fold 'inhibit-fold) nil)
     (t case-fold-search))))