From 31589931c9eabe83a4284cba7f59068aa3266965 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 11 Oct 2013 13:04:09 +0000
Subject: [PATCH] codetools: var notes only for global vars

git-svn-id: trunk@43203 -
---
 components/codetools/pascalparsertool.pas | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/components/codetools/pascalparsertool.pas b/components/codetools/pascalparsertool.pas
index 027043f622..95f83f80e1 100644
--- a/components/codetools/pascalparsertool.pas
+++ b/components/codetools/pascalparsertool.pas
@@ -3277,11 +3277,10 @@ begin
   if CurNode.Parent.Desc in AllCodeSections then begin
     if CurPos.Flag=cafEqual then
       ReadConstExpr; // read constant
+    // optional: hint modifier
+    ReadHintModifiers;
   end;
 
-  // optional: hint modifier
-  ReadHintModifiers;
-
   // semicolon and postfix modifiers
   if CurPos.Flag=cafSemicolon then begin
     // read ;