Use reg.exe force overwrite for #151

This commit is contained in:
Michael J. Seiferling
2019-03-02 08:03:17 -06:00
parent b9f5ea2505
commit afbf54e3e7
+1 -6
View File
@@ -318,7 +318,7 @@ Public Class mgrBackup
Dim bPathVerified As Boolean = False Dim bPathVerified As Boolean = False
Dim bBackupCompleted As Boolean = False Dim bBackupCompleted As Boolean = False
sArguments = "export """ & oGame.TruePath & """ """ & sBackupFile & """" sArguments = "export """ & oGame.TruePath & """ """ & sBackupFile & """ /y"
If mgrCommon.IsUnix Then If mgrCommon.IsUnix Then
oWineData = mgrWineData.DoWineDataGetbyID(oGame.ID) oWineData = mgrWineData.DoWineDataGetbyID(oGame.ID)
@@ -345,11 +345,6 @@ Public Class mgrBackup
If bPathVerified Then If bPathVerified Then
Try Try
'Need to delete any prior file if it exists, otherwise reg.exe will get stuck waiting for input it'll never get.
If File.Exists(sBackupFile) Then
File.Delete(sBackupFile)
End If
prsReg.StartInfo.Arguments = sArguments prsReg.StartInfo.Arguments = sArguments
prsReg.StartInfo.FileName = sBinaryPath prsReg.StartInfo.FileName = sBinaryPath
prsReg.StartInfo.UseShellExecute = False prsReg.StartInfo.UseShellExecute = False