From fbaf26f319efbe73ebea79aa08910895e7b49b45 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Tue, 22 Dec 2015 16:47:01 +0100
Subject: [PATCH] fix, completion mostly broken due to change in Laz 1.6-rc1

see http://forum.lazarus.freepascal.org/index.php/topic,30663.msg196486.html#msg196486
---
 src/ce_d2syn.pas | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/src/ce_d2syn.pas b/src/ce_d2syn.pas
index a98506da..2c1420e5 100644
--- a/src/ce_d2syn.pas
+++ b/src/ce_d2syn.pas
@@ -6,7 +6,7 @@ interface
 
 uses
   Classes, SysUtils, Graphics,
-  SynEditHighlighter, SynEditHighlighterFoldBase,
+  SynEditHighlighter, SynEditHighlighterFoldBase, SynEditTypes,
   ce_dlangutils;
 
 const
@@ -134,6 +134,7 @@ type
     procedure doChanged;
   protected
     function GetRangeClass: TSynCustomHighlighterRangeClass; override;
+    function GetIdentChars: TSynIdentChars; override;
 	published
     property foldKinds:   TFoldKinds read fFoldKinds write setFoldKinds;
     property whites:      TSynHighlighterAttributes read fWhiteAttrib write setWhiteAttrib;
@@ -368,6 +369,11 @@ begin
   result := TSynD2SynRange;
 end;
 
+function TSynD2Syn.GetIdentChars: TSynIdentChars;
+begin
+  result := ['_', 'A'..'Z', 'a'..'z', '0'..'9'];
+end;
+
 procedure TSynD2Syn.doChanged;
 begin
   BeginUpdate;