summaryrefslogtreecommitdiff
path: root/Git.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-08-04 13:07:55 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-08-04 13:07:55 -0400
commit9d06348fa368d502fd1330969cad3c0ea25286fa (patch)
tree4a1412d0d02420fcdb5ae42dff47a8dde62fe7c2 /Git.hs
parent944730682471f4e808f4f1faa9797a965ebadb8f (diff)
missed some __WINDOWS__ defines
Diffstat (limited to 'Git.hs')
-rw-r--r--Git.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Git.hs b/Git.hs
index e14f4ec3a..513f052a3 100644
--- a/Git.hs
+++ b/Git.hs
@@ -32,7 +32,7 @@ module Git (
) where
import Network.URI (uriPath, uriScheme, unEscapeString)
-#ifndef __WINDOWS__
+#ifndef mingw32_HOST_OS
import System.Posix.Files
#endif
@@ -131,7 +131,7 @@ hookPath script repo = do
ifM (catchBoolIO $ isexecutable hook)
( return $ Just hook , return Nothing )
where
-#if __WINDOWS__
+#if mingw32_HOST_OS
isexecutable f = doesFileExist f
#else
isexecutable f = isExecutable . fileMode <$> getFileStatus f