From adc4a55b2866a1945ff202cc4379462933a0c500 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sun, 22 Feb 2015 09:39:51 +0100
Subject: [PATCH] added assignation of additional published props

---
 src/ce_d2syn.pas | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/src/ce_d2syn.pas b/src/ce_d2syn.pas
index 60aba8df..4895b783 100644
--- a/src/ce_d2syn.pas
+++ b/src/ce_d2syn.pas
@@ -143,6 +143,7 @@ type
 	public
 		constructor create(aOwner: TComponent); override;
     destructor destroy; override;
+    procedure Assign(Source: TPersistent); override;
     procedure GetTokenEx(out TokenStart: PChar; out TokenLength: integer); override;
     function GetDefaultAttribute(Index: integer): TSynHighlighterAttributes; override;
     procedure setLine(const NewValue: String; LineNumber: Integer); override;
@@ -337,6 +338,18 @@ begin
   inherited;
 end;
 
+procedure TSynD2Syn.Assign(Source: TPersistent);
+var
+  srcsyn: TSynD2Syn;
+begin
+  inherited;
+  if Source is TSynD2Syn then
+  begin
+    srcsyn := TSynD2Syn(Source);
+    FoldKinds := srcsyn.FoldKinds;
+  end;
+end;
+
 function TSynD2Syn.GetRangeClass: TSynCustomHighlighterRangeClass;
 begin
   result := TSynD2SynRange;