|
@@ -75,6 +75,8 @@
|
|
|
Dim Results As List(Of CompFile) = CompFileLoader.Output
|
|
Dim Results As List(Of CompFile) = CompFileLoader.Output
|
|
|
If PageType = CompType.Any Then
|
|
If PageType = CompType.Any Then
|
|
|
Results = Results.Where(Function(r) r.Type <> CompType.Plugin).ToList
|
|
Results = Results.Where(Function(r) r.Type <> CompType.Plugin).ToList
|
|
|
|
|
+ ElseIf PageType = CompType.Shader OrElse PageType = CompType.ResourcePack Then
|
|
|
|
|
+ Results = Results.ToList
|
|
|
Else
|
|
Else
|
|
|
Results = Results.Where(Function(r) r.Type = PageType).ToList
|
|
Results = Results.Where(Function(r) r.Type = PageType).ToList
|
|
|
End If
|
|
End If
|