From c99575c3f16be5e2dd948981da7befe1bc5695a7 Mon Sep 17 00:00:00 2001
From: Silverteal <67404722+Silverteal@users.noreply.github.com>
Date: Sat, 4 May 2024 09:22:24 +0800
Subject: [PATCH] =?UTF-8?q?=E4=BF=AE=E6=94=B9PageDownloadClient.xaml.vb?=
 =?UTF-8?q?=E5=92=8CPageDownloadInstall.xaml.vb?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

对4月1日版本直接判定为愚人节版
---
 .../Pages/PageDownload/PageDownloadClient.xaml.vb         | 8 ++++++++
 .../Pages/PageDownload/PageDownloadInstall.xaml.vb        | 8 ++++++++
 2 files changed, 16 insertions(+)

diff --git a/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadClient.xaml.vb b/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadClient.xaml.vb
index 519b862..83bb44e 100644
--- a/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadClient.xaml.vb	
+++ b/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadClient.xaml.vb	
@@ -44,6 +44,14 @@
                                 Version("type") = "special"
                                 Version.Add("lore", GetMcFoolName(Version("id")))
                         End Select
+                        '所有4月1日发布的版本可视为愚人节版，但不改动版本描述
+                        Select Case Version("releaseDate").Value(Of Date).ToString("MM'/'dd")
+                            Case "04/01"
+                                If Not Version("type") == "special" Then
+                                    Type = "愚人节版"
+                                    Version("type") = "special"
+                                End If
+                        End Select
                     Case "special"
                         '已被处理的愚人节版
                         Type = "愚人节版"
diff --git a/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadInstall.xaml.vb b/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadInstall.xaml.vb
index 1c6f77b..108e699 100644
--- a/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadInstall.xaml.vb	
+++ b/Plain Craft Launcher 2/Pages/PageDownload/PageDownloadInstall.xaml.vb	
@@ -528,6 +528,14 @@
                                 Version("type") = "special"
                                 Version.Add("lore", GetMcFoolName(Version("id")))
                         End Select
+                        '所有4月1日发布的版本视为愚人节版，但不改动版本描述
+                        Select Case Version("releaseDate").Value(Of Date).ToString("MM'/'dd")
+                            Case "04/01"
+                                If Not Version("type") == "special" Then
+                                    Type = "愚人节版"
+                                    Version("type") = "special"
+                                End If
+                        End Select
                     Case "special"
                         '已被处理的愚人节版
                         Type = "愚人节版"