install: begin rework
This commit is contained in:
@@ -13,7 +13,7 @@ Imports Telerik.WinControls.UI
|
||||
|
||||
Public Class Form1
|
||||
|
||||
Private updateConfig As New UpdateConfig
|
||||
Private updateConfig As New ModpackConfig
|
||||
Private currentUpdating As Boolean = False
|
||||
Private lastUpdateCheckResult As UpdateCheckResult = Nothing
|
||||
|
||||
@@ -74,11 +74,7 @@ Public Class Form1
|
||||
RadTextBoxControl_ModpackConfig.Text = filePath
|
||||
Try
|
||||
If IsUpdateConfigLoaded() Then
|
||||
If filePath.StartsWith("http") Then
|
||||
updateConfig = UpdateConfigExt.LoadFromSnippet(filePath)
|
||||
Else
|
||||
updateConfig = UpdateConfig.LoadFromFile(filePath)
|
||||
End If
|
||||
updateConfig = ModpackConfig.LoadFromUrl(filePath)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
RadTextBoxControl_ModpackConfig.Text = String.Empty
|
||||
@@ -169,11 +165,6 @@ Public Class Form1
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ButtonX_EditUpdateConfig_Click(sender As Object, e As EventArgs) Handles RadButton_EditModpackConfig.Click
|
||||
Dim frm As New FormSettings(updateConfig)
|
||||
frm.ShowDialog(Me)
|
||||
End Sub
|
||||
|
||||
Private Async Sub ButtonX_CheckForUpdates_Click(sender As Object, e As EventArgs) Handles RadButton_CheckForUpdates.Click
|
||||
ClearStatus()
|
||||
If CheckStatus() Then
|
||||
|
||||
Reference in New Issue
Block a user