paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-01 13:20:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

Jedi code format: Fix typo.

Browse Source
This commit is contained in:
DomingoGP 2024-06-09 17:47:03 +02:00
parent da0c4ec917
commit 1edd541c58
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/jcf2/ReadWrite/Converter.pas
View File

@ -170,7 +170,7 @@ begin
on E: Exception do on E: Exception do
begin begin
fbConvertError := True; fbConvertError := True;
SendStatusMessage('', Format(lisMsgExpectionClassMsg, ['', E.Message]), mtException, -1, -1); SendStatusMessage('', Format(lisMsgExceptionClassMsg, ['', E.Message]), mtException, -1, -1);
Exit; Exit;
end; end;
end; end;
@ -338,7 +338,7 @@ var
leParseError: TEParseError; leParseError: TEParseError;
leMessageType: TStatusMessageType; leMessageType: TStatusMessageType;
begin begin
lsMessage := Format(lisMsgExpectionClassMsg, [pe.ClassName, pe.Message]); lsMessage := Format(lisMsgExceptionClassMsg, [pe.ClassName, pe.Message]);
if pe is TEParseError then if pe is TEParseError then
begin begin

2
components/jcf2/jcfbaseconsts.pas
View File

@ -36,7 +36,7 @@ const
lisMsgEmptyExceptEndBlock = 'Empty except..end block'; lisMsgEmptyExceptEndBlock = 'Empty except..end block';
lisMsgEmptyFinallyEndBlock = 'Empty finally..end block'; lisMsgEmptyFinallyEndBlock = 'Empty finally..end block';
lisMsgEmptyTryBlock = 'Empty try block'; lisMsgEmptyTryBlock = 'Empty try block';
lisMsgExpectionClassMsg = 'Exception %s %s'; lisMsgExceptionClassMsg = 'Exception %s %s';
lisMsgExceptionParsing = 'Exception parsing "%s": %s'; lisMsgExceptionParsing = 'Exception parsing "%s": %s';
lisMsgExceptionTokenising = 'Exception tokenising "%s": %s'; lisMsgExceptionTokenising = 'Exception tokenising "%s": %s';
lisMsgExistsAlreadyRemoveIt = '%s %s %s exists already. Remove it?'; lisMsgExistsAlreadyRemoveIt = '%s %s %s exists already. Remove it?';