From da6b64c9bcb449fd1da2d874211c9316d88fb6d2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=E8=96=84=E5=A5=9A=E6=A2=A6=E7=81=B5?=
 <188181427+shimoranla@users.noreply.github.com>
Date: Tue, 4 Mar 2025 12:30:43 +0800
Subject: [PATCH] =?UTF-8?q?fix(btnDisplayDesc=5FClick):=E5=B0=91=E4=BA=86?=
 =?UTF-8?q?=E4=B8=AA=E6=A0=87=E8=AE=B0?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 .../Pages/PageVersion/PageVersionOverall.xaml.vb                 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionOverall.xaml.vb b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionOverall.xaml.vb
index 08ce7c4..e2b8f3c 100644
--- a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionOverall.xaml.vb	
+++ b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionOverall.xaml.vb	
@@ -108,6 +108,7 @@
             '确认输入的新名称
             Dim OldName As String = PageVersionLeft.Version.Name
             Dim OldPath As String = PageVersionLeft.Version.Path
+ReType:
             '修改此部分的同时修改快速安装的版本名检测*
             Dim NewName As String = MyMsgBoxInput("重命名版本", "", OldName, New ObjectModel.Collection(Of Validate) From {New ValidateFolderName(PathMcFolder & "versions", IgnoreCase:=False)})
             If String.IsNullOrWhiteSpace(NewName) Then Exit Sub