summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-10-13 13:24:44 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-10-13 13:24:44 -0400
commit195d478d65ba0b0e862e2b9ea28edd49012d651f (patch)
tree846d83a2cd2d9fcc24a85794c6c15af90908fa6d
parent4ef249a83870f8f4b494a9118eed3d1b83314112 (diff)
fix various build warnings, mostly on Windows
And some when S3 is disabled
-rw-r--r--Git/FileMode.hs2
-rw-r--r--Remote/Git.hs2
2 files changed, 1 insertions, 3 deletions
diff --git a/Git/FileMode.hs b/Git/FileMode.hs
index c3dfe570a..b07fd302c 100644
--- a/Git/FileMode.hs
+++ b/Git/FileMode.hs
@@ -11,8 +11,6 @@ module Git.FileMode where
import Utility.FileMode
-import System.PosixCompat.Types
-
symLinkMode :: FileMode
symLinkMode = 40960
diff --git a/Remote/Git.hs b/Remote/Git.hs
index c80a0d1c6..1c2573642 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -707,5 +707,5 @@ mkCopier remotewanthardlink rsyncparams = do
, return copier
)
#else
- return copier
+ return $ if remotewanthardlink then copier else copier
#endif