Fix trashing broken symlinks

2025-11-29 17:17:52 -08:00
parent 239c2319a5
commit e5a5bc5f4b
1 changed files with 1 additions and 1 deletions
--- a/cl-xdg-trash/mountpoints.lisp
+++ b/cl-xdg-trash/mountpoints.lisp
@ -61,7 +61,7 @@ return file-systems that were mounted read-write."
  "Return the device id for the device on which PATH resides, or nil if it can't
 be determined."
  (handler-case
-      (osicat-posix:stat-dev (osicat-posix:stat path))
+      (osicat-posix:stat-dev (osicat-posix:lstat path))
    (osicat-posix:posix-error ()
      nil)))