|
|
@@ -689,7 +689,7 @@ Wait:
|
|
|
"应用", "运行", "前置", "mojang", "官启", "新建文件夹", "eclipse", "microsoft", "hotspot",
|
|
|
"runtime", "x86", "x64", "forge", "原版", "optifine", "官方", "启动", "hmcl", "mod", "高清",
|
|
|
"download", "launch", "程序", "path", "version", "baka", "pcl", "zulu", "local", "packages",
|
|
|
- "4297127d64ec6", "1.", "启动"}
|
|
|
+ "4297127d64ec6", "1.", "启动", "jbr-"}
|
|
|
For Each FolderInfo As DirectoryInfo In OriginalPath.EnumerateDirectories
|
|
|
If FolderInfo.Attributes.HasFlag(FileAttributes.ReparsePoint) Then Continue For '跳过符号链接
|
|
|
Dim SearchEntry = GetFolderNameFromPath(FolderInfo.Name).ToLower '用于搜索的字符串
|
lingting