Merge pull request #4449 from tangge233/VersionSortFix
fix: 检测愚人节版本所用时区不正确
This commit is contained in:
@@ -45,7 +45,8 @@
|
|||||||
Version.Add("lore", GetMcFoolName(Version("id")))
|
Version.Add("lore", GetMcFoolName(Version("id")))
|
||||||
End Select
|
End Select
|
||||||
'所有4月1日发布的版本可视为愚人节版,但不改动版本描述
|
'所有4月1日发布的版本可视为愚人节版,但不改动版本描述
|
||||||
Select Case Version("releaseTime").Value(Of Date).ToString("MM'/'dd")
|
Dim swedenTime As Date = Version("releaseTime").Value(Of Date).ToUniversalTime().AddHours(2)
|
||||||
|
Select Case swedenTime.ToString("MM'/'dd")
|
||||||
Case "04/01"
|
Case "04/01"
|
||||||
If Not Version("type") = "special" Then
|
If Not Version("type") = "special" Then
|
||||||
Type = "愚人节版"
|
Type = "愚人节版"
|
||||||
|
|||||||
@@ -620,7 +620,8 @@
|
|||||||
Version.Add("lore", GetMcFoolName(Version("id")))
|
Version.Add("lore", GetMcFoolName(Version("id")))
|
||||||
End Select
|
End Select
|
||||||
'所有4月1日发布的版本视为愚人节版,但不改动版本描述
|
'所有4月1日发布的版本视为愚人节版,但不改动版本描述
|
||||||
Select Case Version("releaseTime").Value(Of Date).ToString("MM'/'dd")
|
Dim swedenTime As Date = Version("releaseTime").Value(Of Date).ToUniversalTime().AddHours(2)
|
||||||
|
Select Case swedenTime.ToString("MM'/'dd")
|
||||||
Case "04/01"
|
Case "04/01"
|
||||||
If Not Version("type") = "special" Then
|
If Not Version("type") = "special" Then
|
||||||
Type = "愚人节版"
|
Type = "愚人节版"
|
||||||
|
|||||||
Reference in New Issue
Block a user