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

IDE: fixed typo

Browse Source 
git-svn-id: trunk@38378 -
This commit is contained in:
maxim 2012-08-25 21:38:05 +00:00
parent 58d0e7b9ff
commit f317a74361
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/editormacrolistviewer.pas
View File

@ -870,13 +870,13 @@ begin
if lbRecordedView.ItemIndex < 0 then exit;
M := CurrentEditorMacroList.Macros[lbRecordedView.ItemIndex];
s := M.MacroName;
if InputQuery(lisNewMacroname2, Format(lisEnterNewMaweForMacroS, [m.MacroName]), s)
if InputQuery(lisNewMacroname2, Format(lisEnterNewNameForMacroS, [m.MacroName]), s)
then begin
while (s <> '') and (CurrentEditorMacroList.IndexOfName(s) >= 0) do begin
case MessageDlg(lisDuplicateName, lisAMacroWithThisNameAlreadyExists, mtWarning,
mbOKCancel, 0) of
mrOK:
if not InputQuery(lisNewMacroname2, Format(lisEnterNewMaweForMacroS, [m.MacroName]), s)
if not InputQuery(lisNewMacroname2, Format(lisEnterNewNameForMacroS, [m.MacroName]), s)
then s := '';
else
s := '';

2
ide/lazarusidestrconsts.pas
View File

@ -5568,7 +5568,7 @@ resourcestring
lisDuplicateName = 'Duplicate Name';
lisAMacroWithThisNameAlreadyExists = 'A macro with this name already exists.';
lisNewMacroname2 = 'New Macroname';
lisEnterNewMaweForMacroS = 'Enter new mawe for Macro "%s"';
lisEnterNewNameForMacroS = 'Enter new name for Macro "%s"';
implementation