avoid build warning on windows

diff --git a/Annex/Content/PointerFile.hs b/Annex/Content/PointerFile.hs
index 997f731ca6f72ba5f17d4ea9a94d91077ed5bbd2..cf66801d9402fb55d25cadfaa45fdde6baeef8e2 100644 (file)
--- a/Annex/Content/PointerFile.hs
+++ b/Annex/Content/PointerFile.hs
@@ -22,7 +22,9 @@ import Annex.ReplaceFile
 import Annex.InodeSentinal
 import Annex.Content.LowLevel
 import Utility.InodeCache
+#if ! defined(mingw32_HOST_OS)
 import Utility.Touch
+#endif
 
 {- Populates a pointer file with the content of a key. 
  -

diff --git a/Remote/Git.hs b/Remote/Git.hs
index d145a0e54222e1d2270fa93b03e4c2a7fbc4f04f..3a7bb48446484696fc28dad8c6986370bbe9de50 100644 (file)
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -61,9 +61,9 @@ import Creds
 import Types.NumCopies
 import Annex.Action
 import Messages.Progress
-import qualified Utility.RawFilePath as R
 
 #ifndef mingw32_HOST_OS
+import qualified Utility.RawFilePath as R
 import Utility.FileMode
 #endif