diff --git a/lib/GHCup/Utils/File/Windows.hs b/lib/GHCup/Utils/File/Windows.hs
index 5d168cf..84d979b 100644
--- a/lib/GHCup/Utils/File/Windows.hs
+++ b/lib/GHCup/Utils/File/Windows.hs
@@ -295,15 +295,15 @@ deleteFile = WS.deleteFile
 
 
 install :: FilePath -> FilePath -> Bool -> IO ()
-install = moveFile
+install = copyFile
 
 
 moveFile :: FilePath -> FilePath -> IO ()
-moveFile from to = Win32.moveFileEx from (Just to) 0
+moveFile from to = WS.moveFileEx from (Just to) 0
 
 
 moveFilePortable :: FilePath -> FilePath -> IO ()
-moveFilePortable = Win32.moveFile
+moveFilePortable = WS.moveFile
 
 
 removeEmptyDirectory :: FilePath -> IO ()