From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 23 Nov 2020 17:53:12 +0000 (-0400)
Subject: fix build on windows
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~2^2^2~80^2~20
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=06a80dc790ba4f47a296dbbdcccfafe9499dc9e6;p=git-annex.git

fix build on windows
---

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