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

cody: dictionary

Browse Source 
git-svn-id: trunk@33658 -
This commit is contained in:
mattias 2011-11-20 23:25:15 +00:00
parent 5c84b3e84a
commit 4ab001d5dc
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/codetools/ide/codyregistration.pas
View File

@ -58,9 +58,7 @@ var
ViewCodyWindowCommand: TIDECommand;
CopyDeclarationToClipboardCommand: TIDECommand;
CutDeclarationToClipboardCommand: TIDECommand;
{$IFDEF EnableCodyIdentifiers}
ShowIdentifierDictionaryCommand: TIDECommand;
{$ENDIF}
begin
CodyOptions:=TCodyMiscOptions.Create;
CodyOptions.LoadSafe;
@ -156,14 +154,12 @@ begin
crsShowCodeToolsNodeInfo, nil, nil, ShowCodeNodeInfoCommand);
// Show unit / identifier dictionary
{$IFDEF EnableCodyIdentifiers}
InitUnitDictionary;
ShowIdentifierDictionaryCommand:=RegisterIDECommand(CmdCatCodeTools, 'ShowUnitDictionary',
crsShowUnitIdentifierDictionary,
CleanIDEShortCut,CleanIDEShortCut,nil,@ShowUnitDictionaryDialog);
RegisterIDEMenuCommand(itmViewIDEInternalsWindows, 'ShowIdentifierDictionary',
crsShowUnitIdentifierDictionary, nil, nil, ShowIdentifierDictionaryCommand);
{$ENDIF}
// View menu - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
ViewCodyWindowCommand:=RegisterIDECommand(CmdCatView, 'Cody',