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

IDE: Rename TKeyCommandRelationList.CreateDefaultMapping to DefineCommandCategories

Browse Source 
git-svn-id: trunk@35480 -
This commit is contained in:
juha 2012-02-19 13:00:01 +00:00
parent 4310d040e2
commit dea040f1e5
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/keymapping.pp
View File

@ -147,7 +147,7 @@ type
public
constructor Create;
destructor Destroy; override;
procedure CreateDefaultMapping;
procedure DefineCommandCategories;
procedure Clear;
function Count: integer;
function CategoryCount: integer; override;
@ -2390,7 +2390,7 @@ begin
inherited Destroy;
end;
procedure TKeyCommandRelationList.CreateDefaultMapping;
procedure TKeyCommandRelationList.DefineCommandCategories;
// Define a category for each command
var
C: TIDECommandCategory;

2
ide/main.pp
View File

@ -2159,7 +2159,7 @@ begin
IDECmdScopeSrcEditOnlySyncroEdit.AddWindowClass(TLazSynPluginSyncroEditForm);
IDECmdScopeSrcEditOnlySyncroEditOff.AddWindowClass(TLazSynPluginSyncroEditFormOff);
EditorOpts.KeyMap.CreateDefaultMapping;
EditorOpts.KeyMap.DefineCommandCategories;
end;
procedure TMainIDE.SetupIDEMsgQuickFixItems;

2
ideintf/idecommands.pas
View File

@ -47,7 +47,7 @@ const
1. Add a constant with a unique value in the list below.
2. Add it to GetDefaultKeyForCommand to define the default keys+shiftstates
3. Add it to EditorCommandToDescriptionString to define the description
4. Add it to TKeyCommandRelationList.CreateDefaultMapping to define the category.
4. Add it to TKeyCommandRelationList.DefineCommandCategories to define the category.
}
ecNone = 0;