paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-22 14:39:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: clean up

Browse Source 
git-svn-id: trunk@35248 -
This commit is contained in:
mattias 2012-02-08 22:18:45 +00:00
parent 12f6b0c40c
commit e88c4ccc31
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packager/packageeditor.pas
View File

@ -524,7 +524,6 @@ var
Removed: boolean; Removed: boolean;
CurFile: TPkgFile; CurFile: TPkgFile;
Writable: Boolean; Writable: Boolean;
FileIndex: Integer;
CurNode: TTreeNode; CurNode: TTreeNode;
IsDir: Boolean; IsDir: Boolean;
@ -590,7 +589,6 @@ begin
// items for single files, under section PkgEditMenuSectionFile // items for single files, under section PkgEditMenuSectionFile
PkgEditMenuSectionFile.Visible:=CurFile<>nil; PkgEditMenuSectionFile.Visible:=CurFile<>nil;
if (CurFile<>nil) then begin if (CurFile<>nil) then begin
FileIndex:=LazPackage.IndexOfPkgFile(CurFile);
SetItem(PkgEditMenuOpenFile,@OpenFileMenuItemClick); SetItem(PkgEditMenuOpenFile,@OpenFileMenuItemClick);
SetItem(PkgEditMenuReAddFile,@ReAddMenuItemClick,Removed); SetItem(PkgEditMenuReAddFile,@ReAddMenuItemClick,Removed);
SetItem(PkgEditMenuRemoveFile,@RemoveBitBtnClick,not Removed,RemoveBitBtn.Enabled); SetItem(PkgEditMenuRemoveFile,@RemoveBitBtnClick,not Removed,RemoveBitBtn.Enabled);