fix windows build

This commit is contained in:
Joey Hess 2013-11-18 11:05:16 -04:00
parent d2aea7acb9
commit 5561b46416

View file

@ -53,9 +53,7 @@ import Annex.Perms
import Annex.Link import Annex.Link
import Annex.Content.Direct import Annex.Content.Direct
import Annex.ReplaceFile import Annex.ReplaceFile
#ifndef mingw32_HOST_OS
import Annex.Exception import Annex.Exception
#endif
{- Checks if a given key's content is currently present. -} {- Checks if a given key's content is currently present. -}
inAnnex :: Key -> Annex Bool inAnnex :: Key -> Annex Bool