mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix build on windows

Browse source
This commit is contained in:
Joey Hess 2020-11-23 13:53:12 -04:00
parent a6f7017eba
commit 06a80dc790
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Annex/Content/Presence.hs
View file

@ -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