From c57d5ad7aef9dc30374ccb6fb78230147fa96f98 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 13 Jun 2011 08:02:17 +0000
Subject: [PATCH] IDE: codeexplorer: nicer node names

git-svn-id: trunk@31193 -
---
 ide/codeexplorer.pas | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/ide/codeexplorer.pas b/ide/codeexplorer.pas
index 7c4d78c5ca..7b39925e35 100644
--- a/ide/codeexplorer.pas
+++ b/ide/codeexplorer.pas
@@ -709,6 +709,21 @@ begin
     ctnUnit, ctnProgram, ctnLibrary, ctnPackage:
       Result:=CodeNode.DescAsString+' '+ACodeTool.ExtractSourceName;
 
+    ctnTypeSection:
+      Result:='Type';
+
+    ctnVarSection:
+      Result:='Var';
+
+    ctnConstSection:
+      Result:='Const';
+
+    ctnLabelSection:
+      Result:='Label';
+
+    ctnResStrSection:
+      Result:='Resourcestring';
+
     ctnTypeDefinition,ctnVarDefinition,ctnConstDefinition,ctnUseUnit:
       Result:=ACodeTool.ExtractIdentifier(CodeNode.StartPos);
 
@@ -729,9 +744,21 @@ begin
                      phpWithParameterNames,phpWithDefaultValues,phpWithResultType,
                      phpWithOfObject,phpWithCallingSpecs,phpWithProcModifiers]);
 
+    ctnProcedureHead:
+      Result:='Procedure Header';
+
     ctnProperty:
       Result:=ACodeTool.ExtractPropName(CodeNode,false); // property keyword is not needed because there are icons
 
+    ctnInterface:
+      Result:='Interface';
+
+    ctnBeginBlock:
+      Result:='Begin block';
+
+    ctnAsmBlock:
+      Result:='Asm block';
+
     else
       Result:=CodeNode.DescAsString;
     end;