Function: reftex-recursive-directory-list

reftex-recursive-directory-list is a byte-compiled function defined in reftex.el.gz.

Signature

(reftex-recursive-directory-list DIR)

Documentation

Return a list of all directories below DIR, including DIR itself.

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/reftex.el.gz
(defun reftex-recursive-directory-list (dir)
  "Return a list of all directories below DIR, including DIR itself."
  (let ((path (list dir)) path1 file files)
    (while (setq dir (pop path))
      (when (file-directory-p dir)
        (setq files (nreverse (directory-files dir t "[^.]")))
        (while (setq file (pop files))
          (if (file-directory-p file)
              (push (file-name-as-directory file) path)))
        (push dir path1)))
    path1))