Fix ignored directories appearing in output sometimes

2025-10-25 19:07:06 -07:00
parent fa9af1d225
commit 22ef933933
1 changed files with 1 additions and 1 deletions
--- a/clash/clash.lisp
+++ b/clash/clash.lisp
@ -419,7 +419,7 @@ list of trash directories that were present in INFOS."
         (nconc path-and-infos
                (mapcar #'list
                        (when all-dirs
-                          (set-difference (cl-xdg-trash:list-trash-directories)
+                          (set-difference (list-nonexcluded-trash-dirs cmd)
                                          dirs :test #'uiop:pathname-equal))))))
      (all-dirs (error "Can't have -D without -d"))
      (no-sort infos)