chores: 一些判断和命名修改
This commit is contained in:
@@ -1331,7 +1331,7 @@ Retry:
|
|||||||
Loaders.Add(New LoaderTask(Of String, String)($"获取 {LoaderName} 详细信息",
|
Loaders.Add(New LoaderTask(Of String, String)($"获取 {LoaderName} 详细信息",
|
||||||
Sub(Task As LoaderTask(Of String, String))
|
Sub(Task As LoaderTask(Of String, String))
|
||||||
'获取 Forge / NeoForge 版本列表
|
'获取 Forge / NeoForge 版本列表
|
||||||
Dim ForgeLoader = If(IsNeo, New LoaderTask(Of String, List(Of DlNeoForgeVersionEntry))("McDownloadForgeLoader " & Inherit, AddressOf DlNeoForgeVersionMain), New LoaderTask(Of String, List(Of DlForgeVersionEntry))("McDownloadForgeLoader " & Inherit, AddressOf DlForgeVersionMain))
|
Dim ForgeLoader = If(IsNeo, New LoaderTask(Of String, List(Of DlNeoForgeVersionEntry))("McDownloadNeoForgeLoader " & Inherit, AddressOf DlNeoForgeVersionMain), New LoaderTask(Of String, List(Of DlForgeVersionEntry))("McDownloadForgeLoader " & Inherit, AddressOf DlForgeVersionMain))
|
||||||
ForgeLoader.WaitForExit(Inherit)
|
ForgeLoader.WaitForExit(Inherit)
|
||||||
Task.Progress = 0.8
|
Task.Progress = 0.8
|
||||||
'查找对应版本
|
'查找对应版本
|
||||||
|
|||||||
@@ -75,7 +75,7 @@
|
|||||||
End If
|
End If
|
||||||
|
|
||||||
'启动 NeoForge 加载
|
'启动 NeoForge 加载
|
||||||
If SelectedMinecraftId.StartsWith("1.") Then
|
If SelectedMinecraftId.StartsWith("1.") AndAlso Int(SelectedMinecraftId.Split(".")(1)) > 19 Then
|
||||||
Dim NeoForgeLoader = New LoaderTask(Of String, List(Of DlNeoForgeVersionEntry))("DlNeoForgeVersion " & SelectedMinecraftId, AddressOf DlNeoForgeVersionMain)
|
Dim NeoForgeLoader = New LoaderTask(Of String, List(Of DlNeoForgeVersionEntry))("DlNeoForgeVersion " & SelectedMinecraftId, AddressOf DlNeoForgeVersionMain)
|
||||||
LoadNeoForge.State = NeoForgeLoader
|
LoadNeoForge.State = NeoForgeLoader
|
||||||
NeoForgeLoader.Start(SelectedMinecraftId)
|
NeoForgeLoader.Start(SelectedMinecraftId)
|
||||||
|
|||||||
Reference in New Issue
Block a user