Function: tex-expand-files

tex-expand-files is a byte-compiled function defined in tex-mode.el.gz.

Signature

(tex-expand-files S)

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/tex-mode.el.gz
;; This will perhaps be useful for modifying TEXINPUTS.
;; Expand each file name, separated by colons, in the string S.
(defun tex-expand-files (s)
  (let (elts (start 0))
    (while (string-match ":" s start)
      (setq elts (cons (substring s start (match-beginning 0)) elts))
      (setq start (match-end 0)))
    (or (= start 0)
	(setq elts (cons (substring s start) elts)))
    (mapconcat (lambda (elt)
		 (if (= (length elt) 0) elt (expand-file-name elt)))
	       (nreverse elts) ":")))