Removed some unused code

This commit is contained in:
Michael J. Seiferling
2016-11-14 15:43:16 -06:00
parent 8ebfed7ab7
commit 3184cb61ec
+2 -8
View File
@@ -161,12 +161,6 @@ Public Class mgrRestore
Return slRemovedItems Return slRemovedItems
End Function End Function
Private Sub CleanFolder(ByVal sExtractPath As String)
If Directory.Exists(sExtractPath) Then
End If
End Sub
Public Function CheckRestorePrereq(ByVal oBackupInfo As clsBackup, ByVal bCleanFolder As Boolean) As Boolean Public Function CheckRestorePrereq(ByVal oBackupInfo As clsBackup, ByVal bCleanFolder As Boolean) As Boolean
Dim sHash As String Dim sHash As String
Dim sExtractPath As String Dim sExtractPath As String
@@ -198,8 +192,8 @@ Public Class mgrRestore
End If End If
End If End If
'Check file integrity 'Check file integrity
If oSettings.CheckSum Then If oSettings.CheckSum Then
If oBackupInfo.CheckSum <> String.Empty Then If oBackupInfo.CheckSum <> String.Empty Then
sHash = mgrHash.Generate_SHA256_Hash(sBackupFile) sHash = mgrHash.Generate_SHA256_Hash(sBackupFile)
If sHash <> oBackupInfo.CheckSum Then If sHash <> oBackupInfo.CheckSum Then