fix windows build

This commit is contained in:
Joey Hess 2015-12-28 12:44:04 -04:00
parent b61575516b
commit 645833774d
Failed to extract signature

View file

@ -586,8 +586,8 @@ linkOrCopy key src dest = catchBoolIO $
)
where
hardlink = do
#ifndef mingw32_HOST_OS
s <- getstat
#ifndef mingw32_HOST_OS
if linkCount s > 1
then copy s
else liftIO (createLink src dest >> return True)