From e39d6c3effd08043c9d3bcc582458402aabf50f8 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sun, 4 Feb 2018 01:58:39 +0000
Subject: [PATCH] codetools: fixed restart parsing

git-svn-id: trunk@57250 -
---
 components/codetools/pascalparsertool.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/components/codetools/pascalparsertool.pas b/components/codetools/pascalparsertool.pas
index 2dc83b374d..55482ea76c 100644
--- a/components/codetools/pascalparsertool.pas
+++ b/components/codetools/pascalparsertool.pas
@@ -800,6 +800,7 @@ begin
         CurSection:=CurNode.Desc;
         Node:=CurNode;
         case Node.Desc of
+        ctnUnit, ctnProgram, ctnLibrary, ctnPackage: ScannedRange:=lsrSourceName;
         ctnInterface: ScannedRange:=lsrInterfaceStart;
         ctnImplementation: ScannedRange:=lsrImplementationStart;
         ctnInitialization: ScannedRange:=lsrInitializationStart;