diff options
| -rw-r--r-- | Git/FileMode.hs | 2 | ||||
| -rw-r--r-- | Remote/Git.hs | 2 |
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 |