Emacs: Dired, Show All Subdirectories π
Dired, Show All Subdirectories
(defun xah-dired-show-all-subdirs () "In `dired', show all files in subdirs (βrecursivelyβ) . Note: for thousands of files, may take a few seconds. Code originally by Oliver Winspear. Version: 2023-10-31" (interactive) (dired default-directory "-lR")) ;; here's older code: ;; (defun my-dired-recursive-expand () ;; "in `dired', show all subdirs. ;; By Oliver Winspear. ;; Version: 2023-10-31" ;; (interactive) ;; (when (not (eq major-mode 'dired-mode)) ;; (user-error "must be in `dired'.")) ;; (mapc (lambda (file) ;; (when (file-directory-p file) ;; (dired-insert-subdir file))) ;; (directory-files-recursively default-directory "" t)))