From 3927cd86b3d6ff640c66f552d23aa72bd4ce98c0 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 22 Apr 2011 15:50:17 +0000
Subject: [PATCH] IDE: codeexplorer: hide constants

git-svn-id: trunk@30428 -
---
 ide/codeexplorer.pas | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/ide/codeexplorer.pas b/ide/codeexplorer.pas
index c92c77da02..5e776a1a7f 100644
--- a/ide/codeexplorer.pas
+++ b/ide/codeexplorer.pas
@@ -845,14 +845,13 @@ begin
       ShowChilds:=false;
     end;
 
-    // don't show End.
-    if CodeNode.Desc=ctnEndPoint then
+    // don't show special nodes
+    if CodeNode.Desc in [ctnEndPoint,ctnConstant,ctnIdentifier] then
       ShowNode:=false;
       
     // don't show class visibility section nodes
-    if (CodeNode.Desc in AllClassSections) then begin
+    if (CodeNode.Desc in AllClassSections) then
       ShowNode:=false;
-    end;
 
     if Mode=cemCategory then begin
       // don't show method bodies