Renamed test class because wrong issue was referenced; it's JAM-Software#1001

Author: Sebastian Modersohn

Tests/VTWorkerThreadIssue1000Tests.pas renamed to Tests/VTWorkerThreadIssue1001Tests.pas

@@ -1,4 +1,4 @@
-unit VTWorkerThreadIssue1000Tests;
+unit VTWorkerThreadIssue1001Tests;
 
 interface
 
@@ -15,7 +15,7 @@   TTestBaseVirtualTree = class(TBaseVirtualTree)
   end;
 
   [TestFixture]
-  TVTWorkerThreadIssue1000Tests = class
+  TVTWorkerThreadIssue1001Tests = class
   strict private
     fTree: TTestBaseVirtualTree;
     fForm: TForm;
@@ -39,7 +39,7 @@ implementation
   VirtualTrees.WorkerThread,
   SysUtils;
 
-procedure TVTWorkerThreadIssue1000Tests.Setup;
+procedure TVTWorkerThreadIssue1001Tests.Setup;
 begin
   TThread.Synchronize(nil, procedure
     begin
@@ -50,15 +50,15 @@ procedure TVTWorkerThreadIssue1000Tests.Setup;
     end);
 end;
 
-procedure TVTWorkerThreadIssue1000Tests.TearDown;
+procedure TVTWorkerThreadIssue1001Tests.TearDown;
 begin
   TThread.Synchronize(nil, procedure
     begin
       FreeAndNil(fForm);
     end);
 end;
 
-procedure TVTWorkerThreadIssue1000Tests.TestDestroyWhileWorkerThreadBusy;
+procedure TVTWorkerThreadIssue1001Tests.TestDestroyWhileWorkerThreadBusy;
 begin
   TThread.Synchronize(nil, procedure
     begin
@@ -75,7 +75,7 @@ procedure TVTWorkerThreadIssue1000Tests.TestDestroyWhileWorkerThreadBusy;
     end);
 end;
 
-procedure TVTWorkerThreadIssue1000Tests.TreeCompareNodes(
+procedure TVTWorkerThreadIssue1001Tests.TreeCompareNodes(
   Sender: TBaseVirtualTree; Node1, Node2: PVirtualNode; Column: TColumnIndex;
   var Result: Integer);
 begin
@@ -86,6 +86,6 @@ procedure TVTWorkerThreadIssue1000Tests.TreeCompareNodes(
 
 initialization
   Randomize;
-  TDUnitX.RegisterTestFixture(TVTWorkerThreadIssue1000Tests);
+  TDUnitX.RegisterTestFixture(TVTWorkerThreadIssue1001Tests);
 
 end.