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 1/2] 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;

From d386e723aea21204c800115d59f9fb23ecbf6641 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sun, 22 Feb 2015 09:40:35 +0100
Subject: [PATCH 2/2] fix, fold kinds were overwritten for each new editor

---
 src/ce_synmemo.pas | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas
index 78758977..8bb8a359 100644
--- a/src/ce_synmemo.pas
+++ b/src/ce_synmemo.pas
@@ -337,7 +337,6 @@ begin
   end;
   //
   Highlighter := D2Syn;
-  D2Syn.FoldKinds := [fkBrackets, fkComments1, fkComments2, fkStrings, fkRegion];
   //
   fTempFileName := GetTempDir(false) + 'temp_' + uniqueObjStr(self) + '.d';
   fFilename := '<new document>';