diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-04-08 15:25:32 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-04-08 15:25:32 -0400 |
| commit | 9e65dd757f9fe8e031ea936ce4e2a8cb998f7f83 (patch) | |
| tree | 7b6e0c509838db15e079f57f176f5902e65508c5 /Utility/CopyFile.hs | |
| parent | fdfd56c647d685ad5618917341db0b7c97e1b63a (diff) | |
hard links on windows
* annex.thin and annex.hardlink are now supported on Windows.
* unannex --fast now makes hard links on Windows.
Diffstat (limited to 'Utility/CopyFile.hs')
| -rw-r--r-- | Utility/CopyFile.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/Utility/CopyFile.hs b/Utility/CopyFile.hs index 46bc43d50..01c600504 100644 --- a/Utility/CopyFile.hs +++ b/Utility/CopyFile.hs @@ -49,13 +49,9 @@ copyFileExternal meta src dest = do {- Create a hard link if the filesystem allows it, and fall back to copying - the file. -} createLinkOrCopy :: FilePath -> FilePath -> IO Bool -#ifndef mingw32_HOST_OS createLinkOrCopy src dest = go `catchIO` const fallback where go = do createLink src dest return True fallback = copyFileExternal CopyAllMetaData src dest -#else -createLinkOrCopy = copyFileExternal CopyAllMetaData -#endif |