--- Merging r43190 into '.':

U    packages/fcl-report/src/fpreport.pp
--- Recording mergeinfo for merge of r43190 into '.':
 U   .

# revisions: 43190

git-svn-id: branches/fixes_3_2@44003 -

packages/fcl-report/src/fpreport.pp

@@ -2516,7 +2516,7 @@ function ReportSectionsToString(AValue: TFPReportSections): string;
     lIndex: integer;
   begin
     Result := '';
-    for lIndex := Ord(Low(TFPReportSection)) to Ord(High(TFPReportSection)) do
+    for lIndex := Ord(Low(TFPReportSections)) to Ord(High(TFPReportSections)) do
     begin
       if TFPReportSection(lIndex) in AValue then
       begin