From a4139bdfc124223d2bf7f55bb4c3b93809bc6da1 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sun, 23 Aug 2015 16:30:57 +0200
Subject: [PATCH] fix #27, the highlighter does not handle the script line

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

diff --git a/src/ce_d2syn.pas b/src/ce_d2syn.pas
index 09e3f8cf..847b332b 100644
--- a/src/ce_d2syn.pas
+++ b/src/ce_d2syn.pas
@@ -487,6 +487,15 @@ begin
   if fTokStop > length(fLineBuf) then exit;
   readerReset;
 
+  // script line
+  if LineIndex = 0 then if fTokStart = 1 then
+    if readDelim(reader, fTokStop, '#!') then
+    begin
+      fTokKind := tkCommt;
+      readLine(reader, fTokStop);
+      exit;
+    end else readerReset;
+
   // spaces
   if (isWhite(reader^)) then
   begin