diff --git a/cl-xdg-trash/mountpoints.lisp b/cl-xdg-trash/mountpoints.lisp
index 84e7cf4..6e5e8db 100644
--- 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)))