;; Recurse down all directories.
(let ((files (nnheader-directory-files dir t nil t))
(max 0)
- min rdir num subdirectoriesp file)
+ min num subdirectoriesp file)
;; Recurse down directories.
(setq subdirectoriesp
;; nth 1 of file-attributes always 1 on MS Windows :(