revertsadfasdf
This commit is contained in:
@@ -9,12 +9,11 @@ Public Class AppConfig
|
||||
Public Property LastConfigFilePath As String
|
||||
Public Property KeepLocalFiles As New List(Of String)
|
||||
Public Property RemoveLocalFiles As Boolean
|
||||
Public Property OnlySearchSubfolders As Boolean
|
||||
|
||||
Public Sub Reset()
|
||||
KeepLocalFiles.Clear()
|
||||
KeepLocalFiles.Add("OptiFine_1.7.10_HD_U_E7.jar")
|
||||
OnlySearchSubfolders = True
|
||||
RemoveLocalFiles = False
|
||||
End Sub
|
||||
|
||||
Public Shared ReadOnly Property Instance As AppConfig
|
||||
|
||||
@@ -89,7 +89,6 @@ Public Class UpdateInstaller
|
||||
Dim allLocalFiles = Directory.GetFiles(localPath, "*", SearchOption.AllDirectories)
|
||||
For Each lf As String In allLocalFiles
|
||||
Dim isKnown As Boolean = False
|
||||
Dim allowRemove As Boolean = AppConfig.Instance.OnlySearchSubfolders OrElse Path.GetDirectoryName(lf) <> localPath
|
||||
|
||||
For Each checkedFile As String In checkedFiles
|
||||
If Not isKnown AndAlso If(checkedFile, "") = If(lf, "") Then
|
||||
@@ -97,7 +96,7 @@ Public Class UpdateInstaller
|
||||
End If
|
||||
Next
|
||||
|
||||
If Not isKnown AndAlso allowRemove Then
|
||||
If Not isKnown Then
|
||||
result.SyncFiles.Add(New UpdateSyncFile(If(ignoreRevmoedFiles, UpdateSyncAction.None, UpdateSyncAction.RemovedFile), lf, String.Empty))
|
||||
End If
|
||||
Next
|
||||
|
||||
Reference in New Issue
Block a user