From 0dac6411d86137ae9ca453a79630dc5d193a82ba Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 8 Mar 2023 12:17:09 -0400 Subject: [PATCH] fix build on OSX Breakage from 54ad1b4cfb1c8302f1b862cb2699ab9351e3eb5b --- Utility/DirWatcher/FSEvents.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Utility/DirWatcher/FSEvents.hs b/Utility/DirWatcher/FSEvents.hs index a2e3b4ae2d..1559b7eabc 100644 --- a/Utility/DirWatcher/FSEvents.hs +++ b/Utility/DirWatcher/FSEvents.hs @@ -7,8 +7,9 @@ module Utility.DirWatcher.FSEvents (watchDir) where -import Common hiding (isDirectory) +import Common import Utility.DirWatcher.Types +import qualified Utility.RawFilePath as R import System.OSX.FSEvents import qualified System.Posix.Files as Files @@ -89,7 +90,7 @@ watchDir dir ignored scanevents hooks = do where runhook h s = maybe noop (\a -> a f s) (h hooks) - getstatus = catchMaybeIO . getSymbolicLinkStatus + getstatus = catchMaybeIO . R.getSymbolicLinkStatus . fromRawFilePath {- Check each component of the path to see if it's ignored. -} ignoredPath :: (FilePath -> Bool) -> FilePath -> Bool -- 2.30.2