fix build on OSX

Breakage from 54ad1b4cfb1c8302f1b862cb2699ab9351e3eb5b

diff --git a/Utility/DirWatcher/FSEvents.hs b/Utility/DirWatcher/FSEvents.hs
index a2e3b4ae2d2055ad1641c088a45d9fcd165edf42..1559b7eabc18747f2f19f83d143b801610cbe127 100644 (file)
--- 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