Fix +dired/--subdirs-not-inserted

This commit is contained in:
2025-02-17 23:23:11 +00:00
parent 51ce40aee0
commit e053cd907e

View File

@@ -3333,8 +3333,7 @@ Here I setup dired with a few niceties
(subdirs-available (mapcar #'(lambda (x) (concat x "/"))
(dired-get-marked-files))))
(dired-unmark-all-marks)
(cl-remove-if #'(lambda (f) (member f subdirs-present))
subdirs-available)))
(cl-remove-if #'(lambda (f) (member f subdirs-inserted)) subdirs-available)))
(defun +dired/insert-all-subdirectories (&optional arg)
"Insert all subdirectories recursively."