Lines Matching refs:dirs
2109 (dirs (if (and dirpart (string-match "[[*?]" dirpart))
2114 (while dirs
2115 (when (or (null (car dirs)) ; Possible if DIRPART is not wild.
2116 (file-directory-p (directory-file-name (car dirs))))
2123 (directory-files (or (car dirs) ".") full
2127 (if (and (car dirs) (not full))
2128 (mapcar (function (lambda (name) (concat (car dirs) name)))
2132 (setq dirs (cdr dirs)))
14127 (vhdl-speedbar-insert-dirs (speedbar-file-lists directory) depth)
14132 (when (= depth 0) (vhdl-speedbar-expand-dirs directory)))
14272 (defun vhdl-speedbar-expand-dirs (directory)
14970 (defun vhdl-speedbar-insert-dirs (files level)
14972 (let ((dirs (car files)))
14973 (while dirs
14974 (speedbar-make-tag-line 'angle ?+ 'vhdl-speedbar-dired (car dirs)
14975 (car dirs) 'speedbar-dir-follow nil
14977 (setq dirs (cdr dirs)))))
14991 (vhdl-speedbar-insert-dirs