paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-22 12:39:23 +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 public
constructor Create; constructor Create;
destructor Destroy; override; destructor Destroy; override;
procedure CreateDefaultMapping; procedure DefineCommandCategories;
procedure Clear; procedure Clear;
function Count: integer; function Count: integer;
function CategoryCount: integer; override; function CategoryCount: integer; override;
@ -2390,7 +2390,7 @@ begin
inherited Destroy; inherited Destroy;
end; end;
procedure TKeyCommandRelationList.CreateDefaultMapping; procedure TKeyCommandRelationList.DefineCommandCategories;
// Define a category for each command // Define a category for each command
var var
C: TIDECommandCategory; C: TIDECommandCategory;

2
ide/main.pp
View File

@ -2159,7 +2159,7 @@ begin
IDECmdScopeSrcEditOnlySyncroEdit.AddWindowClass(TLazSynPluginSyncroEditForm); IDECmdScopeSrcEditOnlySyncroEdit.AddWindowClass(TLazSynPluginSyncroEditForm);
IDECmdScopeSrcEditOnlySyncroEditOff.AddWindowClass(TLazSynPluginSyncroEditFormOff); IDECmdScopeSrcEditOnlySyncroEditOff.AddWindowClass(TLazSynPluginSyncroEditFormOff);
EditorOpts.KeyMap.CreateDefaultMapping; EditorOpts.KeyMap.DefineCommandCategories;
end; end;
procedure TMainIDE.SetupIDEMsgQuickFixItems; 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. 1. Add a constant with a unique value in the list below.
2. Add it to GetDefaultKeyForCommand to define the default keys+shiftstates 2. Add it to GetDefaultKeyForCommand to define the default keys+shiftstates
3. Add it to EditorCommandToDescriptionString to define the description 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; ecNone = 0;