From 06a80dc790ba4f47a296dbbdcccfafe9499dc9e6 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 23 Nov 2020 13:53:12 -0400
Subject: [PATCH] fix build on windows

---
 Annex/Content/Presence.hs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Annex/Content/Presence.hs b/Annex/Content/Presence.hs
index 861288c0b9..4b33bcefb2 100644
--- 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