From f8623847f30176c7aee20e5221b37b21c6730cce Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 18 Apr 2016 17:10:01 +0000
Subject: [PATCH] IDE: clean up

git-svn-id: trunk@52214 -
---
 designer/menueditor.pp               | 2 +-
 ide/frames/editor_markup_options.pas | 2 --
 2 files changed, 1 insertion(+), 3 deletions(-)

diff --git a/designer/menueditor.pp b/designer/menueditor.pp
index c17999ea54..69ec72aa9a 100644
--- a/designer/menueditor.pp
+++ b/designer/menueditor.pp
@@ -194,7 +194,7 @@ type
     procedure DeleteChildlessShadowAndItem(anExistingSI: TShadowItem);
     procedure DeleteShadowAndItemAndChildren(anExistingSI: TShadowItem);
     procedure InPlaceEditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
-    procedure OnDesignerModified(Sender: TObject; PropName: ShortString);
+    procedure OnDesignerModified(Sender: TObject; {%H-}PropName: ShortString);
     procedure OnObjectPropertyChanged(Sender: TObject; NewObject: TPersistent);
     procedure OnDesignerRefreshPropertyValues;
     procedure RecursiveCreateShadows(aParentBox: TShadowBox; aMI: TMenuItem);
diff --git a/ide/frames/editor_markup_options.pas b/ide/frames/editor_markup_options.pas
index dd3beb6d2f..2b702b2043 100644
--- a/ide/frames/editor_markup_options.pas
+++ b/ide/frames/editor_markup_options.pas
@@ -326,8 +326,6 @@ begin
 end;
 
 procedure TEditorMarkupOptionsFrame.ReadSettings(AOptions: TAbstractIDEOptions);
-var
-  i, j, idx: Integer;
 begin
   with AOptions as TEditorOptions do
   begin