better dummy value

no need for empty string when it's going to be thrown away..
This commit is contained in:
Joey Hess 2020-09-02 14:54:46 -04:00
parent 6e9a4f50f3
commit 22a7f14e7b
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -110,16 +110,16 @@ moveFile src dest = tryIO (rename src dest) >>= onrename
onrename (Left e)
| isPermissionError e = rethrow
| isDoesNotExistError e = rethrow
| otherwise = viaTmp mv dest ""
| otherwise = viaTmp mv dest ()
where
rethrow = throwM e
mv tmp _ = do
-- copyFile is likely not as optimised as
-- the mv command, so we'll use the command.
--
-- But, while Windows has a "mv", it does not seem very
-- reliable, so use copyFile there.
mv tmp () = do
-- copyFile is likely not as optimised as
-- the mv command, so we'll use the command.
--
-- But, while Windows has a "mv", it does not seem very
-- reliable, so use copyFile there.
#ifndef mingw32_HOST_OS
-- If dest is a directory, mv would move the file
-- into it, which is not desired.