InfStarMC/PCL-ISE
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

fix: NeoForge 官方源不可用

Browse Source 
chores: 代码清理
This commit is contained in:
Pigeon0v0
2024-06-26 23:55:58 +08:00
parent 2cfa9b2015
commit ee10caa84e
1 changed files with 6 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Plain Craft Launcher 2/Modules/Minecraft/ModDownload.vb
+6 -8
View File
@@ -981,21 +981,19 @@
For Each Token As String In VersionsJArray
Dim StdVersion As String
Dim IsBeta As Boolean
Dim rawVersion As String = Token.ToString()
Dim rawVersion As String = Token
If rawVersion.Contains("-beta") Then
StdVersion = Token.ToString().Replace("neoforge-", "").Replace("-beta", "")
StdVersion = Token.Replace("neoforge-", "").Replace("-beta", "")
IsBeta = True
Else
StdVersion = Token.ToString().Replace("neoforge-", "")
StdVersion = Token.Replace("neoforge-", "")
IsBeta = False
End If
Dim Inherit As String = "1." & StdVersion.ToString().Split(".")(0) & "." & StdVersion.ToString().Split(".")(1)
If Inherit.EndsWith(".0") Then
Inherit = Inherit.Replace(".0", "")
End If
Dim Inherit As String = "1." & StdVersion.Split(".")(0) & "." & StdVersion.Split(".")(1)
Inherit = Inherit.Replace(".0", "")
Dim Entry = New DlNeoForgeVersionEntry
If Loader.Input IsNot Nothing Then
If Inherit Is Loader.Input Then
If Inherit Is Loader.Input.ToString() Then
Entry = New DlNeoForgeVersionEntry With {.Version = rawVersion, .Inherit = Inherit, .IsBeta = IsBeta, .StdVersion = StdVersion}
Versions.Add(Entry)
Continue For