Lines Matching refs:dirs
463 (defun Info-default-dirs ()
515 (Info-default-dirs))
517 (Info-default-dirs)))))))
630 (let ((dirs (if (string-match "^\\./" filename)
643 (while (and dirs (not found))
644 (setq temp (expand-file-name filename (car dirs)))
646 (expand-file-name (downcase filename) (car dirs)))
668 (setq dirs (cdr dirs))))))
1025 (let ((dirs (if Info-additional-directory-list
1034 buffers buffer others nodes dirs-done)
1037 (while dirs
1038 (let ((truename (file-truename (expand-file-name (car dirs)))))
1039 (or (member truename dirs-done)
1040 (member (directory-file-name truename) dirs-done)
1054 (setq dirs-done
1057 dirs-done)))
1071 (unless (cdr dirs)
1073 (file-name-as-directory (car dirs))))
1074 (setq dirs (cdr dirs))))
1477 (dirs
1481 (dolist (dir dirs)