[Scummvm-git-logs] scummvm master -> c893c5a60b8298aa99ae1a47dea51c6f04c419bc
lephilousophe
lephilousophe at users.noreply.github.com
Wed Sep 25 18:24:02 CEST 2019
This automated email contains information about 1 new commit which have been
pushed to the 'scummvm' repo located at https://github.com/scummvm/scummvm .
Summary:
c893c5a60b MSVC: Fix MoveFile error when destination exists
Commit: c893c5a60b8298aa99ae1a47dea51c6f04c419bc
https://github.com/scummvm/scummvm/commit/c893c5a60b8298aa99ae1a47dea51c6f04c419bc
Author: Le Philousophe (lephilousophe at users.noreply.github.com)
Date: 2019-09-25T18:23:34+02:00
Commit Message:
MSVC: Fix MoveFile error when destination exists
Use CopyFile with overwrite flag instead
Changed paths:
devtools/create_project/scripts/revision.vbs
diff --git a/devtools/create_project/scripts/revision.vbs b/devtools/create_project/scripts/revision.vbs
index b8c2d61..47eff42 100644
--- a/devtools/create_project/scripts/revision.vbs
+++ b/devtools/create_project/scripts/revision.vbs
@@ -492,11 +492,10 @@ Sub CompareFileAndReplace(src_filename, dst_filename)
Set file = FSO.OpenTextFile(dst_filename, 1, 0, 0)
dst_data = file.ReadAll
file.Close
- If StrComp(src_data, dst_data, vbBinaryCompare) = 0 Then
- ' Files are the same, just remove the source
- FSO.DeleteFile src_filename
- Else
+ If StrComp(src_data, dst_data, vbBinaryCompare) <> 0 Then
' Files are different, overwrite the destination
- FSO.MoveFile src_filename, dst_filename
+ FSO.CopyFile src_filename, dst_filename, True
End If
+ ' Remove temporary source
+ FSO.DeleteFile src_filename
End Sub
More information about the Scummvm-git-logs
mailing list