Function: erc-find-file

erc-find-file is a byte-compiled function defined in erc.el.gz.

Signature

(erc-find-file FILE &optional PATH)

Documentation

Search for a FILE in the filesystem.

First the default-directory is searched for FILE, then any directories specified in the list PATH.

If FILE is found, return the path to it.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc.el.gz
;; script execution and startup

(defun erc-find-file (file &optional path)
  "Search for a FILE in the filesystem.
First the `default-directory' is searched for FILE, then any directories
specified in the list PATH.

If FILE is found, return the path to it."
  (let ((filepath file))
    (if (file-readable-p filepath) filepath
      (while (and path
                  (progn (setq filepath (expand-file-name file (car path)))
                         (not (file-readable-p filepath))))
        (setq path (cdr path)))
      (if path filepath nil))))