added punctuation to guessMessageKind() identifier breakers

This commit is contained in:
Basile Burg 2014-11-11 05:53:01 +01:00
parent 76c236ce4e
commit 12c6a2cf8d
1 changed files with 2 additions and 2 deletions

View File

@ -191,7 +191,7 @@ begin
end; end;
{$ENDREGION} {$ENDREGION}
{$REGION ICESessionOptionsObserver ------------------------------------------------------} {$REGION ICESessionOptionsObserver ---------------------------------------------}
procedure TCEMessagesWidget.setMaxMessageCount(aValue: Integer); procedure TCEMessagesWidget.setMaxMessageCount(aValue: Integer);
begin begin
if aValue < 10 then if aValue < 10 then
@ -511,7 +511,7 @@ begin
begin begin
if pos > length(aMessg) then if pos > length(aMessg) then
exit; exit;
if aMessg[pos] in [#0..#32] then if aMessg[pos] in [#0..#32, ',', ':', ';', '.'] then
begin begin
Inc(pos); Inc(pos);
result := checkIdent; result := checkIdent;