Function: dired-buffers-for-dir-or-subdir

dired-buffers-for-dir-or-subdir is a byte-compiled function defined in dired.el.gz.

Signature

(dired-buffers-for-dir-or-subdir DIR)

Documentation

Return a list of buffers for DIR or a subdirectory thereof.

As a side effect, killed Dired buffers for DIR are removed from dired-buffers.

Source Code

;; Defined in /usr/src/emacs/lisp/dired.el.gz
(defun dired-buffers-for-dir-or-subdir (dir)
  "Return a list of buffers for DIR or a subdirectory thereof.
As a side effect, killed Dired buffers for DIR are removed from
`dired-buffers'."
  (setq dir (file-name-as-directory dir))
  (let (result buf)
    (dolist (elt dired-buffers)
      (setq buf (cdr elt))
      (cond
       ((null (buffer-name buf))
	;; Buffer is killed - clean up:
	(setq dired-buffers (delq elt dired-buffers)))
       ((dired-in-this-tree-p (car elt) dir)
        (setq result (cons buf result)))))
    result))