Function: inhibit-local-variables-p

inhibit-local-variables-p is a byte-compiled function defined in files.el.gz.

Signature

(inhibit-local-variables-p)

Documentation

Return non-nil if file local variables should be ignored.

This checks the file (or buffer) name against inhibit-local-variables-regexps and inhibit-local-variables-suffixes. If inhibit-local-variables-ignore-case is non-nil, this ignores case.

Source Code

;; Defined in /usr/src/emacs/lisp/files.el.gz
(defun inhibit-local-variables-p ()
  "Return non-nil if file local variables should be ignored.
This checks the file (or buffer) name against `inhibit-local-variables-regexps'
and `inhibit-local-variables-suffixes'.  If
`inhibit-local-variables-ignore-case' is non-nil, this ignores case."
  (let ((temp inhibit-local-variables-regexps)
	(name (if buffer-file-name
		  (file-name-sans-versions buffer-file-name)
		(buffer-name)))
	(case-fold-search inhibit-local-variables-ignore-case))
    (while (let ((sufs inhibit-local-variables-suffixes))
	     (while (and sufs (not (string-match (car sufs) name)))
	       (setq sufs (cdr sufs)))
	     sufs)
      (setq name (substring name 0 (match-beginning 0))))
    (while (and temp
		(not (string-match (car temp) name)))
      (setq temp (cdr temp)))
    temp))