Fix trashing broken symlinks

This commit is contained in:
2025-11-29 17:17:52 -08:00
parent 239c2319a5
commit e5a5bc5f4b

View File

@ -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 "Return the device id for the device on which PATH resides, or nil if it can't
be determined." be determined."
(handler-case (handler-case
(osicat-posix:stat-dev (osicat-posix:stat path)) (osicat-posix:stat-dev (osicat-posix:lstat path))
(osicat-posix:posix-error () (osicat-posix:posix-error ()
nil))) nil)))