feat: NeoForge BMCLAPI 版本列表获取

fix: 之前的排序方法会导致 IDE 警告
2024-06-26 23:43:37 +08:00
parent 707b6eec14
commit 2cfa9b2015
3 changed files with 39 additions and 21 deletions
@@ -2191,7 +2191,9 @@ Retry:
        Dim FreshStableVersion As DlNeoForgeVersionEntry = Nothing
        Dim FreshBetaVersion As DlNeoForgeVersionEntry = Nothing
        If Entrys.Any Then
-            For Each Entry In Entrys
+            Dim VersionsArray = Entrys.ToList()
+            VersionsArray.Reverse()
+            For Each Entry In VersionsArray
                If Entry.IsBeta Then
                    FreshBetaVersion = Entry
                Else