chores: 同步 #4360 有关下载任务名称的修改

2024-09-22 10:24:01 +08:00
parent ff6239bb89
commit f0b32ab6f2
1 changed files with 7 additions and 1 deletions
@@ -205,7 +205,13 @@
        RunInNewThread(
        Sub()
            Try
-                Dim Desc As String = If(Project.Type = CompType.ModPack, "整合包", If(Project.Type = CompType.Mod, "Mod ", "资源包"))
+                Dim Desc As String = "资源"
+                Select Case Project.Type
+                    Case CompType.ModPack : Desc = "整合包"
+                    Case CompType.Mod : Desc = "Mod "
+                    Case CompType.ResourcePack : Desc = "资源包"
+                    Case CompType.Shader : Desc = "光影包"
+                End Select
                '确认默认保存位置
                Dim DefaultFolder As String = Nothing
                If Project.Type = CompType.Mod Then