Function: TeX-match-extension

TeX-match-extension is a byte-compiled function defined in tex.el.

Signature

(TeX-match-extension FILE &optional EXTENSIONS)

Documentation

Return non-nil if FILE has one of EXTENSIONS.

If EXTENSIONS is not specified or nil, the value of TeX-file-extensions is used instead.

Source Code

;; Defined in ~/.emacs.d/elpa/auctex-14.1.2/tex.el
(defun TeX-match-extension (file &optional extensions)
  "Return non-nil if FILE has one of EXTENSIONS.

If EXTENSIONS is not specified or nil, the value of
`TeX-file-extensions' is used instead."

  (if (null extensions)
      (setq extensions TeX-file-extensions))

  (let ((regexp (concat "\\.\\("
                        (mapconcat #'identity extensions "\\|")
                        "\\)$"))
        (case-fold-search t))
    (string-match regexp file)))