From 770e65db0e423311f494120517f1737af197c3bd Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 25 Jan 2012 12:48:56 +0000
Subject: [PATCH] IDE: clean up

git-svn-id: trunk@34918 -
---
 packager/packageeditor.pas | 13 -------------
 1 file changed, 13 deletions(-)

diff --git a/packager/packageeditor.pas b/packager/packageeditor.pas
index 9ac49c8f05..77790f604e 100644
--- a/packager/packageeditor.pas
+++ b/packager/packageeditor.pas
@@ -676,13 +676,7 @@ end;
 
 procedure TPackageEditorForm.MorePopupMenuPopup(Sender: TObject);
 var
-  CurDependency: TPkgDependency;
-  Removed: boolean;
-  CurFile: TPkgFile;
   Writable: Boolean;
-  FileIndex: Integer;
-  CurNode: TTreeNode;
-  IsDir: Boolean;
 
   procedure SetItem(Item: TIDEMenuCommand; AnOnClick: TNotifyEvent;
                     aShow: boolean = true; AEnable: boolean = true);
@@ -697,14 +691,7 @@ begin
   PackageEditorMenuRoot.MenuItem:=MorePopupMenu.Items;
   PackageEditorMenuRoot.BeginUpdate;
   try
-    CurNode:=FilesTreeView.Selected;
-    CurDependency:=GetCurrentDependency(Removed);
     Writable:=(not LazPackage.ReadOnly);
-    if (CurDependency=nil) then
-      CurFile:=GetCurrentFile(Removed)
-    else
-      CurFile:=nil;
-    IsDir:=IsDirectoryNode(CurNode) or (CurNode=FFilesNode);
 
     PkgEditMenuSectionFileType.Clear;