style(PageVersionOverall):移除无用代码
This commit is contained in:
@@ -108,7 +108,6 @@
|
|||||||
'确认输入的新名称
|
'确认输入的新名称
|
||||||
Dim OldName As String = PageVersionLeft.Version.Name
|
Dim OldName As String = PageVersionLeft.Version.Name
|
||||||
Dim OldPath As String = PageVersionLeft.Version.Path
|
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)})
|
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
|
If String.IsNullOrWhiteSpace(NewName) Then Exit Sub
|
||||||
|
|||||||
Reference in New Issue
Block a user