Merge pull request #6025 from PCL-Community/fix#6024

fix(ModDownloadLib): #5920 造成的无法下载 OptiFine

Author: LTCatt

Plain Craft Launcher 2/Pages/PageDownload/ModDownloadLib.vb

@@ -613,7 +613,7 @@ pause"
             Log("[Download] 检测为新版 OptiFine：" & DownloadInfo.Inherit)
             Loaders.Add(New LoaderTask(Of List(Of NetFile), Boolean)("安装 OptiFine（方式 A）",
             Sub(Task As LoaderTask(Of List(Of NetFile), Boolean))
-                Dim BaseMcFolderHome As String = BaseMcFolderHome.TrimEnd("\")
+                Dim BaseMcFolderHome As String = RequestTaskTempFolder().TrimEnd("\")
                 Dim BaseMcFolder As String = BaseMcFolderHome & "\.minecraft\"
                 Try
                     '准备安装环境