summaryrefslogtreecommitdiff
path: root/Utility/Kqueue.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Utility/Kqueue.hs')
-rw-r--r--Utility/Kqueue.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Kqueue.hs b/Utility/Kqueue.hs
index f9f965f6f..f0559e531 100644
--- a/Utility/Kqueue.hs
+++ b/Utility/Kqueue.hs
@@ -80,7 +80,7 @@ getDirInfo dir = do
return $ DirInfo dir contents
where
getDirEnt f = catchMaybeIO $ do
- s <- getFileStatus (dir </> f)
+ s <- getSymbolicLinkStatus (dir </> f)
return $ DirEnt f (fileID s) (isDirectory s)
{- Difference between the dirCaches of two DirInfos. -}