From 2026e88d489866d4ef3af1cc57131f9e3356e14d Mon Sep 17 00:00:00 2001
From: marc <marc@lazarus-ide.org>
Date: Thu, 6 Aug 2009 23:06:17 +0000
Subject: [PATCH] * Improved localization of Divider Draw settings tab by Maxim
 Ganetsky

git-svn-id: trunk@21125 -
---
 ide/editoroptions.pp | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/ide/editoroptions.pp b/ide/editoroptions.pp
index c86bad1f5c..ca5b952be7 100644
--- a/ide/editoroptions.pp
+++ b/ide/editoroptions.pp
@@ -430,7 +430,7 @@ type
     Info: PEditorOptionsDividerInfoList;
   end;
 
-const
+var
 
   EditorOptionsDividerInfoPas: Array [0..8] of TEditorOptionsDividerInfo
   = (
@@ -445,6 +445,8 @@ const
       (Name: dlgDivPasTryName;          Xml: 'Try';     BoolOpt: False; MaxLevel: 0)
     );
 
+const
+
   EditorOptionsDividerDefaults: array[TLazSyntaxHighlighter] of
     TEditorOptionsDividerRecord =
     ( (Count: 0; Info: nil), // none
@@ -2060,6 +2062,16 @@ begin
   EditorOptionsFoldInfoPas[18].Name := dlgFoldPasIfDef;
   EditorOptionsFoldInfoPas[19].Name := dlgFoldPasUserRegion;
 
+  EditorOptionsDividerInfoPas[0].Name:=dlgDivPasUnitSectionName;
+  EditorOptionsDividerInfoPas[1].Name:=dlgDivPasUsesName;
+  EditorOptionsDividerInfoPas[2].Name:=dlgDivPasVarGlobalName;
+  EditorOptionsDividerInfoPas[3].Name:=dlgDivPasVarLocalName;
+  EditorOptionsDividerInfoPas[4].Name:=dlgDivPasStructGlobalName;
+  EditorOptionsDividerInfoPas[5].Name:=dlgDivPasStructLocalName;
+  EditorOptionsDividerInfoPas[6].Name:=dlgDivPasProcedureName;
+  EditorOptionsDividerInfoPas[7].Name:=dlgDivPasBeginEndName;
+  EditorOptionsDividerInfoPas[8].Name:=dlgDivPasTryName;
+
   AdditionalHighlightAttributes[ahaNone]                := '';
   AdditionalHighlightAttributes[ahaTextBlock]           := dlgAddHiAttrTextBlock;
   AdditionalHighlightAttributes[ahaExecutionPoint]      := dlgAddHiAttrExecutionPoint;