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

fix: 禁用或启用模组没有改变其所在卡片

Browse Source
This commit is contained in:
tangge233
2024-08-05 00:52:08 +08:00
parent d915cd48f6
commit c0a966f212
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Plain Craft Launcher 2/Pages/PageVersion/PageVersionMod.xaml.vb
+4 -4
View File
@@ -407,16 +407,16 @@
If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了 If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了
PanUpdateList.Children.RemoveAt(IndexOfUi) PanUpdateList.Children.RemoveAt(IndexOfUi)
PanUpdateList.Children.Insert(IndexOfUi, NewItem) PanUpdateList.Children.Insert(IndexOfUi, NewItem)
ElseIf ModEntity.State.Equals(McMod.McModState.Fine) Then ElseIf ModEntity.State.Equals(McMod.McModState.Fine) Then '启用 → 禁用
Dim IndexOfUi As Integer = PanDefaultList.Children.IndexOf(PanDefaultList.Children.OfType(Of MyLocalModItem).FirstOrDefault(Function(i) i.Entry Is ModEntity)) Dim IndexOfUi As Integer = PanDefaultList.Children.IndexOf(PanDefaultList.Children.OfType(Of MyLocalModItem).FirstOrDefault(Function(i) i.Entry Is ModEntity))
If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了 If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了
PanDefaultList.Children.RemoveAt(IndexOfUi) PanDefaultList.Children.RemoveAt(IndexOfUi)
PanDefaultList.Children.Insert(IndexOfUi, NewItem) PanDisabledList.Children.Add(NewItem)
ElseIf ModEntity.State.Equals(McMod.McModState.Disabled) Then ElseIf ModEntity.State.Equals(McMod.McModState.Disabled) Then '禁用 → 启用
Dim IndexOfUi As Integer = PanDisabledList.Children.IndexOf(PanDisabledList.Children.OfType(Of MyLocalModItem).FirstOrDefault(Function(i) i.Entry Is ModEntity)) Dim IndexOfUi As Integer = PanDisabledList.Children.IndexOf(PanDisabledList.Children.OfType(Of MyLocalModItem).FirstOrDefault(Function(i) i.Entry Is ModEntity))
If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了 If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了
PanDisabledList.Children.RemoveAt(IndexOfUi) PanDisabledList.Children.RemoveAt(IndexOfUi)
PanDisabledList.Children.Insert(IndexOfUi, NewItem) PanDefaultList.Children.Add(NewItem)
Else Else
Dim IndexOfUi As Integer = PanUnavaliableList.Children.IndexOf(PanUnavaliableList.Children.OfType(Of MyLocalModItem).FirstOrDefault(Function(i) i.Entry Is ModEntity)) Dim IndexOfUi As Integer = PanUnavaliableList.Children.IndexOf(PanUnavaliableList.Children.OfType(Of MyLocalModItem).FirstOrDefault(Function(i) i.Entry Is ModEntity))
If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了 If IndexOfUi = -1 Then Continue For '因为未知原因 Mod 的状态已经切换完了