fix build on windows

diff --git a/Annex/Content/Presence.hs b/Annex/Content/Presence.hs
index 861288c0b98dfcfdd321469ec6200d7ef762726a..4b33bcefb2f65a0aa61e00809e16624f59e1f28c 100644 (file)
--- a/Annex/Content/Presence.hs
+++ b/Annex/Content/Presence.hs
@@ -39,6 +39,10 @@ import Utility.InodeCache
 import Types.WorkerPool
 import qualified Utility.RawFilePath as R
 
+#ifdef mingw32_HOST_OS
+import Annex.Perms
+#endif
+
 {- Checks if a given key's content is currently present. -}
 inAnnex :: Key -> Annex Bool
 inAnnex key = inAnnexCheck key $ liftIO . R.doesPathExist