From 4c44d876146f06bb6b6062b2522e0a6cfcb9aa61 Mon Sep 17 00:00:00 2001
From: ask <ask@lazarus-ide.org>
Date: Fri, 8 Jun 2012 02:03:37 +0000
Subject: [PATCH] TAChart: Fix infinite recursion when drawing chart listbox
 from series with Legend.Multiplicity <> lmSingle

git-svn-id: trunk@37576 -
---
 components/tachart/tacustomseries.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/tachart/tacustomseries.pas b/components/tachart/tacustomseries.pas
index c4da2410b4..b14db418e1 100644
--- a/components/tachart/tacustomseries.pas
+++ b/components/tachart/tacustomseries.pas
@@ -405,8 +405,8 @@ begin
     Legend.Multiplicity := lmSingle;
     GetLegendItemsBasic(AItems);
   finally
-    ParentChart.EnableRedrawing;
     Legend.Multiplicity := oldMultiplicity;
+    ParentChart.EnableRedrawing;
   end;
 end;