From ef5b0ba1f7a93fac1a1b9e41ae673bc607e83d7e Mon Sep 17 00:00:00 2001
From: tangge233 <tangge233@qq.com>
Date: Tue, 20 Aug 2024 14:24:40 +0800
Subject: [PATCH] =?UTF-8?q?fix:=20=E6=90=81=E8=BF=99=E6=9C=80=E5=BC=BA?=
 =?UTF-8?q?=E5=A4=A7=E8=84=91=E5=91=A2=EF=BC=9F?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 .../PageVersion/PageVersionExport.xaml.vb     | 20 +++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb
index c432673..5a1b615 100644
--- a/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb	
+++ b/Plain Craft Launcher 2/Pages/PageVersion/PageVersionExport.xaml.vb	
@@ -164,28 +164,28 @@
         If Directory.Exists(TargetPath) Then
             Dim di As New DirectoryInfo(TargetPath)
             If di.GetDirectories.Length + di.GetFiles.Length = 0 Then Return If(AllowEmpty, 2, 0)
-            '如果有一个文件不在列表，则 hasFalse = True
-            Dim hasFalse As Boolean = False
+            '如果有一个文件不在列表，则 hasExclude = True
+            Dim hasExclude As Boolean = False
             '如果有一个文件在列表，则 hasTrue = True
-            Dim hasTrue As Boolean = False
+            Dim hasInclude As Boolean = False
             For Each d In Directory.EnumerateDirectories(TargetPath)
                 If Directory.EnumerateFileSystemEntries(d).Count = 0 Then Continue For
                 Select Case IsSelected(d, True)
                     Case 0
-                        hasFalse = True
+                        hasExclude = True
                     Case 1
                         Return 1
                     Case 2
-                        hasTrue = True
+                        hasInclude = True
                 End Select
-                If hasTrue AndAlso hasFalse Then Return 1 '如果有文件在、有文件不在列表中，可以断定部分选中
+                If hasInclude AndAlso hasExclude Then Return 1 '如果有文件在、有文件不在列表中，可以断定部分选中
             Next
             For Each f In Directory.EnumerateFiles(TargetPath)
-                If Selected.Contains(f) Then hasTrue = True Else hasFalse = True
-                If hasTrue AndAlso hasFalse Then Return 1 '如果有文件在、有文件不在列表中，可以断定部分选中
+                If Selected.Contains(f) Then hasInclude = True Else hasExclude = True
+                If hasInclude AndAlso hasExclude Then Return 1 '如果有文件在、有文件不在列表中，可以断定部分选中
             Next
-            If hasFalse AndAlso Not hasTrue Then Return 0
-            If hasTrue AndAlso Not hasFalse Then Return 2
+            If hasExclude AndAlso Not hasInclude Then Return 0
+            If hasInclude AndAlso Not hasExclude Then Return 2
         End If
         Return 0
     End Function